当前位置:首页 » VB程序题 » 正文

VB程序题:按照教材例2.2对窗体三个事件过程(Load、Click、DblClick)编程,三个事件中装入不同的图片,可以是你自己喜欢的任何图片或者是学校的图标;在属性窗口练习对鼠标指针改变:MousePointer(值是99,用户自定义)、MouseIcon为Key04.ico图标文件;练习对窗体图标Icon、边框线类型BorderStyle、最大化按钮和最小化按钮的改变。运行时观察效果。

解题:以下为参考答案
Private Sub Form_Click()
   Caption = "单击窗体,改变图片"
   Picture = LoadPicture(App.Path + "\n_015.bmp")
   Print "欢迎使用VB"
End Sub

Private Sub Form_DblClick()
   Cls
   Caption = "双击窗体,卸去图片"
   Picture = LoadPicture("")   '
End Sub

Private Sub Form_Load()
   Caption = "装入窗体"
   Picture = LoadPicture(App.Path + "\n_016.bmp")
   Print "装入图"
End Sub


程序运行效果如下图所示。


Visual Basic程序设计教程(第3版) (龚沛曾等编)课后实验源码

来源:济亨网

本文链接:http://www.wb98.com/post/54.html

本站文章搜索:

<< 上一篇下一篇 >>

文章搜索

Tags列表

赞助商链接

湘公网安备 43011102000514号 - ICP备08100508号