VB程序题：按照教材例2.2对窗体三个事件过程(Load、Click、DblClick)编程，三个事件中装入不同的图片，可以是你自己喜欢的任何图片或者是学校的图标；在属性窗口练习对鼠标指针改变....

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://wb86.com/post/54.html