2.【解析】本题主要考查图片框的使用。图像框的图片通过Picture属性设置。鼠标是单击还是右击可以通过图像框MouseUp事件的Button参数来判断。
MouseUp事件在释放鼠标按钮时发生。其语法格式为:
Private Sub objecLMouseUp([index As Integer,]button As Integer,shift As Integer,x As Single,Y As Single)
object一个对象表达式。
index一个整数,用来唯一地标识一个在控件数组中的控件。
Button:返回一个整数,用来标识该事件的产生是按下(MouseDown)或者释放(MouseUp)按钮引起的。
【解题步骤】
(1)建立界面并设置控件属性。
(2)编写程序代码。
程序提供的代码:
(3)调试并运行程序。
(4)按题目要求存盘。
三、综合应用题
【解析】本题主要考查标签、命令按钮的综合应用。单击按钮触发其Click事件,标题通过Caption属性设置;标签的标题也是通过Caption属性设置;文件的操作一般按照如下步骤进行:打开或建立文件、进行读或写操作、关闭文件。
自定义数据类型通过Type语句来实现,形式如下:
TYpe自定义类型名
元素名[(下标)]As类型名
[元素名(下标)As类型名]
EndType
对于字符串变量类型,根据其存放的字符串长度是否固定,其定义方法有两种:
Dim字符串变量名As String
Dim字符串变量名As String*字符数
注意:程序中用到了App对象的Path属性。Path属性返回或设置当前路径,在设计时是不可用的,对于App对象,在运行时是只读的。
【解题步骤】
(1)编写程序代码。
程序提供的代码:
(2)调试并运行程序。
(3)按题目要求存盘。
责任编辑:小草