首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp。窗体上有个钟表图案,其中代表指针的直线的名称是Line1,还有一个名称为Label1的标签和其他一些控件(如图1所示)。在程序运行时,若用鼠标右键单击圆的边线,则指针恢复到起始位置(如图1所示);若用鼠标左键单
在考生文件夹下有一个工程文件sjt3.vbp。窗体上有个钟表图案,其中代表指针的直线的名称是Line1,还有一个名称为Label1的标签和其他一些控件(如图1所示)。在程序运行时,若用鼠标右键单击圆的边线,则指针恢复到起始位置(如图1所示);若用鼠标左键单
admin
2019-06-11
43
问题
在考生文件夹下有一个工程文件sjt3.vbp。窗体上有个钟表图案,其中代表指针的直线的名称是Line1,还有一个名称为Label1的标签和其他一些控件(如图1所示)。在程序运行时,若用鼠标右键单击圆的边线,则指针恢复到起始位置(如图1所示);若用鼠标左键单击圆的边线,则指针指向鼠标单击的位置(如图2所示);若鼠标左键或右键单击其他位置,则在标签上输出“鼠标位置不对”。
文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的?改为正确的内容。程序中的oncircle函数的作用是判断鼠标单击的位置是否在圆的边线上(判断结果略有误差),是则返回True,否则返回False。符号常量x0、y0是圆心距窗体左上角的距离;符号常量radius是圆的半径。
注意:不能修改程序中的其他部分和各控件的属性。最后将修改后的文件按原文件名存盘。
选项
答案
[操作步骤] 步骤1:打开本题工程文件。 步骤2:打开代码编辑窗口,在指定位置编写如下代码。 参考代码 Const y0&=1110,x0&=1100,radius&=750 Private Function oncircle(X As Single,Y As Single)As Boolean precision=55000 Tf Abs((X-x0)*(X-x0)+(y0-Y)*(y0-Y)-radius*radius)<precision Then’判断鼠标单击的位置是否在圆边上 oncircle=True Else oncircle=False End If End Function Private Sub Form_MouseDown(Button As Tnteget,Shift as Integer,X As Single,Y As Single) Const LEFT_BUTTON=1 If oncircle(X,Y)Then’调用oncircle函数判断鼠标单击的位置 Line1.X1=x0 Line1.Y1=y0 If Button=LEFT_BUTTON Then Line1.X2=X Line1.Y2=
Y
’直线另一端的y坐标为鼠标当前的y值 Else Line1.X2=Line1.
X1
’直线回到初始位置x不变 Line1.Y2=y0-
radius&
’y2为原先坐标减去半径的值 End Tf Label1.Caption="" Else’否则Label1显示位置不对
Label1
="鼠标位置不对" End If End Sub 程序结束 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/otUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
有三个关系R、S和T如下:由关系R和S通过运算得到关系T,则所使用的运算为()。
列表框控件List1中已有若干列表项,则以下能表示List1中当前被选中列表项内容的表达式是()。
下列关于控件数组的叙述中,正确的是
设:a=2,b=8,c=6,d=3,表达式a>bAndNot(c>d)Ord>c的值是
为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为
假设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是()。
以下数据结构中,属于非线性数据结构的是()。
在深度为7的满二叉树中,叶子结点的个数为
以下关于图片框控件的说法中,错误的是
以下说法中正确的是
随机试题
擂茶在宋代称为()。
依据我国《环境保护法》第29条规定,应当划定生态保护红线、实行严格保护的区域包括【】
女性,36岁,4年前妊娠后期曾有发热、发冷;尿急、尿频和尿痛,经抗生素治疗后症状消失。之后的4年中,时常有发热、发冷;尿急、尿频和尿痛反复发作,发作时还常伴下肢水肿,发作时检查,尿蛋白(+++),有脓细胞和白细胞管型,每次发作经抗感染治疗,症状均可消失,近
对于骨盆底的叙述,下列哪项正确
记账人员与经济业务事项和会计事项的经办人员的职责权限应当明确,并( ),相互制约。
期货交易所联网交易的,应当于决定之日起()日内报告中国证监会。
他担心孩子从小受西方的教育,日后会徒有中国人的面孔。当然,他也很欣赏西方的教育。孩子上学很轻松,课程涉及却十分广泛,像环保、人文科学、自然科学,连张华自己也感到新鲜。课余活动很丰富,冰球、棒球、野营……但孩子毕竟是黄皮肤,他必须认识自己的文化,自己的家。
专门机关解释体制源自()
SomehistorianssaythatthemostimportantcontributionofDwightEisenhower’spresidency(总统任期)inthe1950swastheU.S.int
It’sinterestingthatthearrivalofsnowhastheeffectonpeopleindifferentcountries.(76)Forsomecountriesitisanimpo
最新回复
(
0
)