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

admin2019-08-22 104

问题要求在程序运行时，如果按住鼠标左键不放而移动鼠标，鼠标的位置坐标同步显示在窗体右上角的标签(名称为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表示被按下的鼠标键，按下左键时值为l，按下右键时值为2，按下中间键时值为4。x，y参数表示鼠标光标当前位置的坐标。
题目要求按住左键时移动显示鼠标位置，因此在事件过程要判断是否按下了左键，按下了左键则在标签中显示鼠标位置，否则不显示。因此可用If Button=1来判断是否按下了左键及是否显示鼠标位置。因此应该选择C选项。

转载请注明原文地址:https://kaotiyun.com/show/tsTp777K

本试题收录于：二级VB题库NCRE全国计算机二级分类

二级VB

NCRE全国计算机二级

相关试题推荐

随机试题

最新回复(0)

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

二级VB

NCRE全国计算机二级

有三个关系R、S和T如下：则由关系R和S得到关系T的操作是()。

有三个关系R、S和T如下：则由关系R和S得到关系T的操作是()。

下列关于二叉树的叙述中，正确的是()。

设有以下程序：PrivateSubForm_Click()x=50Fori=1To4y=InputBox("请输入一个整数")y=Val(Y)IfyMod5=0Then

在窗体上画一个名称为Text1的文本框，编写如下事件过程代码：PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimchAsStringch=Chr(KeyAscii)

设有如下数组声明：Dima()AsSingle下面关于这一声明的叙述中正确的是()。

设栈的存储空间为S(1：50)，初始状态为top=51。现经过一系列正常的入栈与退栈操作后，top=50，则栈中的元素个数为()。

能够存放组合框的所有项目内容的属性是()。

如图所示，在窗体上有一个文本框控件，名称为TextTime；一个计时器控件，名称为Timer1。要求每1s在文本框中显示一次当前的时间。PrivateSubTimer1TextTime．Text=TimeEndSub在下划线上应填入

重大事故应急救援应根据事故的性质、严重程度、事态发展趋势和控制能力实行分级响应机制，典型的响应级别通常可分为3级。其中三级响应级别是指()。

数字和字母的号数就是该号字的()。

病案存在的循环过程包括：①活动性病案；②被销毁；③病案的建立；④不活动性病案；⑤永不使用。正确的排列顺序应为

在现场采用盐酸萘乙二胺比色法采集测定空气中的NOx时，确定是否终止采样的依据是

某地中级法院审理的一起专利侵权纠纷，涉及甲、乙、丙、丁四种人的行为。请问何种行为不构成专利侵权?()

确定土地权利是指()。

投资机会及项目建议书阶段，是初步决策的阶段，投资估算的误差率在()左右。

已知某无负债公司的总资产价值为10000，发行在外的普通股股票500股，息税前收益EBIT为2000，公司所得税税率为40％。该公司决定发行价值5000，用年利息率8％的公司债赎回同等价值的公司股票，则该公司股票的赎回价格为()。

FileYourStateReturn,TooOnceyoucompleteyourfederalreturn,simplychoosetotransferyourdatatoyourstatereturnfrom

Poetrycanbecomparedtopainting.Whenyoulookataworkofart,youfirstseeitforwhatitis—adepictionofaperson,an

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

二级VB

NCRE全国计算机二级

有三个关系R、S和T如下：则由关系R和S得到关系T的操作是()。

有三个关系R、S和T如下：则由关系R和S得到关系T的操作是()。

下列关于二叉树的叙述中，正确的是()。

设有以下程序：PrivateSubForm_Click()x=50Fori=1To4y=InputBox("请输入一个整数")y=Val(Y)IfyMod5=0Then

在窗体上画一个名称为Text1的文本框，编写如下事件过程代码：PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimchAsStringch=Chr(KeyAscii)

设有如下数组声明：Dima()AsSingle下面关于这一声明的叙述中正确的是()。

设栈的存储空间为S(1：50)，初始状态为top=51。现经过一系列正常的入栈与退栈操作后，top=50，则栈中的元素个数为()。

能够存放组合框的所有项目内容的属性是()。

如图所示，在窗体上有一个文本框控件，名称为TextTime；一个计时器控件，名称为Timer1。要求每1s在文本框中显示一次当前的时间。PrivateSubTimer1TextTime．Text=TimeEndSub在下划线上应填入

重大事故应急救援应根据事故的性质、严重程度、事态发展趋势和控制能力实行分级响应机制，典型的响应级别通常可分为3级。其中三级响应级别是指()。

数字和字母的号数就是该号字的()。

病案存在的循环过程包括：①活动性病案；②被销毁；③病案的建立；④不活动性病案；⑤永不使用。正确的排列顺序应为

在现场采用盐酸萘乙二胺比色法采集测定空气中的NOx时，确定是否终止采样的依据是

某地中级法院审理的一起专利侵权纠纷，涉及甲、乙、丙、丁四种人的行为。请问何种行为不构成专利侵权?()

确定土地权利是指()。

投资机会及项目建议书阶段，是初步决策的阶段，投资估算的误差率在()左右。

已知某无负债公司的总资产价值为10000，发行在外的普通股股票500股，息税前收益EBIT为2000，公司所得税税率为40％。该公司决定发行价值5000，用年利息率8％的公司债赎回同等价值的公司股票，则该公司股票的赎回价格为()。

FileYourStateReturn,TooOnceyoucompleteyourfederalreturn,simplychoosetotransferyourdatatoyourstatereturnfrom

Poetrycanbecomparedtopainting.Whenyoulookataworkofart,youfirstseeitforwhatitis—adepictionofaperson,an

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