首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
设窗体上有一个名称为Labell的标签。程序运行时,单击鼠标左键,再移动鼠标,鼠标的位置坐标会实时地显示在Labell标签中;单击鼠标右键则停止实时显示,并将标签中的内容清除。下面的程序可实现这一功能,请填空。 Dim downAs Boolean
设窗体上有一个名称为Labell的标签。程序运行时,单击鼠标左键,再移动鼠标,鼠标的位置坐标会实时地显示在Labell标签中;单击鼠标右键则停止实时显示,并将标签中的内容清除。下面的程序可实现这一功能,请填空。 Dim downAs Boolean
admin
2012-05-23
32
问题
设窗体上有一个名称为Labell的标签。程序运行时,单击鼠标左键,再移动鼠标,鼠标的位置坐标会实时地显示在Labell标签中;单击鼠标右键则停止实时显示,并将标签中的内容清除。下面的程序可实现这一功能,请填空。
Dim downAs Boolean
Private Sub Form_MouseDown(Button As Integer,Shift As Integer,X As Single,Y As Single)
Select Case 【 】
Case 1
down=True
Case 2
down=False
End Select
End Sub
Private Sub Form_MouseMove(Button As Integer,Shift As Integer,X As Single,Y As Single)
If 【 】Then
【 】=“X=”&X&” Y=″&Y
Else
Label 1.Caption=“”
End If
End Sub
选项
答案
Button down或down=True Labll.Caption
解析
鼠标键状态由参数Bunon来设定,其值为1表示按下了鼠标左键,为2表示按下了鼠标右键,因此在MouseDown事件中需要判断Button参数的值以便进行对全局逻辑变量down的赋值:在鼠标的移动事件中,根据题意如果按下了鼠标左键(即down=True)则输出坐标,否则清空标签,因此进行判断的条件就是down是不是等于True;坐标需要输出到Labell的Caption属性中。
转载请注明原文地址:https://kaotiyun.com/show/nPhp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为 a=1 b=5 Do a=a+b b=b+l LoopWhilea
当滚动条位于最左端或最上端时,Value属性被设置为
在最坏情况下,堆排序需要比较的次数为【】。
设有如下程序:PrivateSubCommand1_Click()DimsumAsDouble,xAsDoublesum=0n=0Fori=1To5x=n/in
使用PublicConst语句声明一个全局的符号常量时,该语句应放在_______。
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指_________。
软件设计包括软件的结构、数据接口和过程设计,其中软件的过程设计是指
结构化程序设计主要强调的是
为了清除列表框中的所有内容,应使用的方法是:_______。
下列哪个面向对象程序设计不同于其他语言的主要特点?
随机试题
课程标准是()。
眶底骨折常伴有下颌骨多发骨折常伴有
外国的组织或者个人来华测绘,必须采取()的形式进行,并不得涉及国家秘密和危害国家安全。
甲公司于2010年1月1日发行5年期面值总额为1000000元的债券。债券票面年利率为6%,到期一次还本付息,按面值发行。2010年12月31日该公司应付债券的账面价值为()元。
居民会议作为居民自治组织的权力机构,在讨论决定问题上与()相似。
能被植物光合作用利用的太阳辐射,称为光合有效辐射(PAR)。图1示意1961-2007年我国年平均PAR强度的空间分布。如仅考虑光合有效辐射,我国农业生产潜力最大的地区是()。
“春秋五霸”指的是____。
设A为n阶非奇异矩阵,α是n维列向量,b为常数,P=证明:PQ可逆的充分必要条件是αTA-1α≠b.
Thenormalhumandailycycleofactivityisofsome7-8hours’sleepalternationwithsome16-17hours’wakefulnessandthatthe
Exposuretosustainednoisehasbeenclaimedto(i)____bloodpressureregulationinhumanbeingsand,particularly,toincrease
最新回复
(
0
)