2. 计算机
  3. 要求在程序运行时，如果按住鼠标左键不放而移动鼠标，鼠标的位置坐标同步显示在窗体右上角的标签(名称为Label1)中，如右图所示，放开鼠标左键后，停止同步显示。 下面可以实现此功能的程序是(　　)。

要求在程序运行时，如果按住鼠标左键不放而移动鼠标，鼠标的位置坐标同步显示在窗体右上角的标签(名称为Label1)中，如右图所示，放开鼠标左键后，停止同步显示。 下面可以实现此功能的程序是(　　)。

admin2018-09-19  93
问题 要求在程序运行时，如果按住鼠标左键不放而移动鼠标，鼠标的位置坐标同步显示在窗体右上角的标签(名称为Label1)中，如右图所示，放开鼠标左键后，停止同步显示。

下面可以实现此功能的程序是(　　)。
选项 A、 Private Sub Form_MouseDown(Button As Integer， Shift As Integer， X As Single， Y As Single)
If Button＝1 Then
　　　　Label1＝"X＝" & X & "   Y＝" & Y
　　End If
End Sub
B、 Private Sub Form_MouseUp(Button As Integer， Shift As Integer， X As Single， Y As Single)
If Button＝1 Then
　　　　Label1＝"X＝" & X & "   Y＝" & Y
　　End If
End Sub
C、Private Sub Form_MouseMove(Button As Integer， Shift As Integer， X As Single， Y As Single)
If Button＝1 Then
　　　　Label1＝"X＝" & X & "   Y＝" & Y
　　End If
End Sub
D、 Private Sub Form_MouseMove(Button As Integer， Shift As Integer， X As Single， Y As Single)
Label1＝"X＝" & X & "   Y＝" & Y
End Sub
答案C
解析 鼠标移动时产生的事件是MouseMove事件。MouseDown事件过程的参数定义如下：
Sub Form_MouseMove(Button As integer， Shift As Integer， x As Single， y As single)
其中Button表示被按下的鼠标键，按下左键时值为1，按下右键时值为2，按下中间键时值为4。x，y参数表示鼠标光标当前位置的坐标。
题目要求按住左键时移动显示鼠标位置，因此在事件过程要判断是否按下了左键，按下了左键则在标签中显示鼠标位置，否则不显示。因此可用If Button＝1来判断是否按下了左键及是否显示鼠标位置。因此应该选择C选项。
转载请注明原文地址:https://www.kaotiyun.com/show/6nFp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)