问答题
18分
（1）在名称为Form1的窗体上画1个名称为Label1的标签数组，含3个标签控件，下标从0开始，外观如图所示，标签上的内容（按下标顺序）分别是：“等级考试”，“程序设计”，“VB程序”。运行后的窗体...
（1）在名称为Form1的窗体上画1个名称为Label1的标签数组，含3个标签控件，下标从0开始，外观如图所示，标签上的内容（按下标顺序）分别是：“等级考试”，“程序设计”，“VB程序”。运行后的窗体如图所示。
注意：
存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt1.frm，工程文件名为sjt1.vbp。
（2）在名称为Form1，标题为“显示鼠标的横坐标”窗体上，画1个名称为Label1的标签。请编写适当事件过程，使得在运行程序时，不按下任何鼠标键，只在窗体上移动鼠标，就可在标签上显示鼠标光标位置的横坐标。如图所示。要求程序中不得使用变量，事件过程中只能写一条语句。
注意：
存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt2.frm，工程名为sjt2.vbp。
注意：
存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt1.frm，工程文件名为sjt1.vbp。
（2）在名称为Form1，标题为“显示鼠标的横坐标”窗体上，画1个名称为Label1的标签。请编写适当事件过程，使得在运行程序时，不按下任何鼠标键，只在窗体上移动鼠标，就可在标签上显示鼠标光标位置的横坐标。如图所示。要求程序中不得使用变量，事件过程中只能写一条语句。
注意：
存盘时，将文件保存至考生文件夹下，且窗体文件名为sjt2.frm，工程名为sjt2.vbp。
参考解析: (1)【考点分析】本题考点有：标签的Caption属性，控件数组的建立方法。
【解题思路】控件数组的建立方法有两种：一种在设计时建立，首先，在窗体上画出某控件，并进行属性设置。然后选中该控件进行"复制"和"粘贴"操作，系统提示"是否建立控件数组"，选择是即可。另外一种是运行时添加控件数组。通过标签对象的Caption属性来设置标签显示内容。
【操作步骤】
步骤1：新建一个窗体，按照题目要求建立标签控件数组并设置相关属性，如图所示。
步骤2：测试并运行程序，关闭程序后按题目要求存盘。
(2)【考点分析】本题考点有：标签控件的Caption属性，MouseMove事件。
【解题思路】 通过MouseMove事件中的X指定鼠标光标当前位置的横坐标，通过标签的Caption属性设置初始内容为空，在程序运行过程中，利用该属性显示当前鼠标光标位置的横坐标值。
【操作步骤】步骤1：新建一个窗体，按照题目要求建立一个标签控件并设置相关属性，如图所示。
步骤2：打开代码编辑窗口，在指定位置编写如下代码。
参考答案
Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Label1.Caption = X '标签中显示当前鼠标光标位置的横坐标值
End Sub
步骤3：测试并运行程序，关闭程序后按题目要求存盘。
百度扫一扫练题
关注千题库公众号
