首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
以下所列程序的功能是:在窗体上有一个文本框控件,程序运行后,用户可以利用鼠标左键来拖动该文本框控件(注意:拖动时,文本框移动的距离和方向由鼠标指针移动的距离和方向来确定),按下鼠标右键则可以在文本框中显示出当前文本控件的位置。 Public yx A
以下所列程序的功能是:在窗体上有一个文本框控件,程序运行后,用户可以利用鼠标左键来拖动该文本框控件(注意:拖动时,文本框移动的距离和方向由鼠标指针移动的距离和方向来确定),按下鼠标右键则可以在文本框中显示出当前文本控件的位置。 Public yx A
admin
2009-02-13
32
问题
以下所列程序的功能是:在窗体上有一个文本框控件,程序运行后,用户可以利用鼠标左键来拖动该文本框控件(注意:拖动时,文本框移动的距离和方向由鼠标指针移动的距离和方向来确定),按下鼠标右键则可以在文本框中显示出当前文本控件的位置。
Public yx As Integer
Public yy As Integer
Private Sub Form_ MouseMove(Button AS Integer,Shift As Integer,_
X As Single,Y As Single)
If Button=1 Then
Text1.Left=【 】
Text1.Top=【 】
End If
End Sub
Private Sub Form_ MouseDown (Button As Integer,Shift As Integer,_
X As Single,Y As Single)
If【 】Then
yx=Text1.Left-X
yy=Text1.Top-Y
End If
If Button=2 Then
Text1.Text=“X坐标:”+Str(Text1.Left)+“Y坐标:”+Str(Text1.Top)
End If
End Sub
选项
答案
X+yx , Y+yy , Button=1
解析
在按下鼠标的时候,也即在Form_MouseDown事件过程中,首先应该要区分按下的是鼠标的左键还是右键,如果按下的是鼠标右键,则应该在文本框中显示当前文本框的位置,即当参数Button=2时,应该执行语句Text1.Text="X坐标:”+Str(Text1.Left)+"Y坐标:"+Str(Text1.Top)。因为题目要求文本框移动的距离和方向都由鼠标指针的移动距离和方向来确定,所以按下鼠标左键,在移动之前有必要记下当前文本框与鼠标指针间的相对距离(见语句yx=Text1.Left-X和yy=Text1.Top-Y),所以其前面的条件语句中的条件应该是参数Button=1。开始移动鼠标指针后,得到的X和Y的值都是当前鼠标指针所在的位置,要使得文本框相对于鼠标指针的位置不变,所以,应该给X和Y的值都加上在按下鼠标左键时鼠标指针与文本框的相对位置。
转载请注明原文地址:https://kaotiyun.com/show/572p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
某二叉树中度为2的结点有18个,则该二叉树中有【】个叶子结点。
下面不属于软件工程3个要素的是
下列叙述中,错误的是
在安全控制命令中,以下哪个命令是显示证书缓存区和密钥表项的命令
软件开发的结构化设计(SD)方法,全面指导模块划分的最重要原则应该()
Java语言的各种数据类型之间提供自动转换,如第1操作数是byte类型,第2操作数是float类型,其结果是______类型。
下列for循环语句的执行次数是()for(intx=0,y=0;(y!=0)&&(x<4);x++)
微机中ROM的中文意义是_______存储器。
【】是指反映数据元素之间逻辑关系的数据结构。
在init()函数里得到applet窗口的宽度的语句是()。
随机试题
造成不良社会后果的政策僵化现象来源于过分注重_______。
下列不属于血吸虫性肝硬化超声特点的是
张护士负责配制消毒液,护士长要求使用次氯酸钠消毒液时应该
村的概念在法律上是指自治村,即设立村民委员会机构的农民集体,大致相当于计划经济时代的生产大队。村农民集体土地所有权属于()。
已知支承吊车梁的柱牛腿,如题图所示,宽度b=500mm,竖向力作用点至下柱边缘的水平距离a=50mm(已考虑安全偏差20mm),牛腿底面倾斜角α=45°,作用在牛腿顶部的按荷载效应标准组合计算的竖向力Fvk=715kN,竖向力的设计值Fv=915kN,吊车
公民身份的认定标准包括( )。
以下叙述错误的是()。
【2014.山东威海】桑代克提出的学习规律包括()。
证明推广的积分中值定理:设F(x)与G(x)都是区间[a,b]上的连续函数,且G(x)≥0,G(x)≠0,则至少存在一点ξ∈[a,b]使得
已知3个类A、B和C,其中类A由类B的一个实例和类C的1个或多个实例构成。能够正确表示类A、B和C之间关系的UML类图是(43)。
最新回复
(
0
)