首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt3.vbp。窗体上有个钟表图案,其中代表指针的直线的名称是Line1,还有一个名称为Label1的标签和其他一些控件(如图1所示)。在程序运行时,若用鼠标右键单击圆的边线,则指针恢复到起始位置(如图1所示);若用鼠标左键单
在考生文件夹下有一个工程文件sjt3.vbp。窗体上有个钟表图案,其中代表指针的直线的名称是Line1,还有一个名称为Label1的标签和其他一些控件(如图1所示)。在程序运行时,若用鼠标右键单击圆的边线,则指针恢复到起始位置(如图1所示);若用鼠标左键单
admin
2019-06-11
17
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
有如下程序代码:PrivateSubForm_Click()DimxAsInteger,yAsInteger,numAsIntegerx=3y=xDoUntilx>=6num
如果在窗体模块中所有程序代码的前面有语句:Dimx,则x是()。
在窗体上画一个名称为CD1的通用对话框,一个名称为Command1的命令按钮,编写如下Click事件过程:PrirateSubCommand1_Click()CD1.FileName=""CD1.InitDir="
(1)在名称为Form1的窗体上添加两个名称分别为Frame1、Frame2的框架,标题分别为“字号”、“修饰”;在Frame1中添加两个单选按钮,1名称分别为Option1、Option2,标题分别为“10号字”、“20号字”,且标题显示在单选按钮的左边
(1)存名称为Form1的窗体上添加一个名称为Text1的文本框,再建立一个名称为Format的弹出式菜单,含三个菜单项,标题分别为“加粗”、“斜体”、“下划线”,名称分别为M1、M2、M3。请编写适当的事件过程,在程序运行时,当用鼠标右键单击文本框时,弹
(1)在名称为Form1的窗体上添加一个名称为C1、标题为“改变颜色”的命令按钮,窗体标题为“改变窗体背景色”。编写程序,使得单击命令按钮时,将窗体的背景颜色改为红色(&HFFF&)。运行程序后的窗体如图所示。要求:程序中不得使用变量,每个事件过
顺序文件在一次打开期间
数据库设计中,用E—R图来描述信息结构但不涉及信息在计算机中的表示,它属于数据库设计的
数据库设计的根本目标是要解决
下面的程序执行时,将把当前目录下的顺序文件smtextl.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写()。PrivateSubCommand1_Click()DiminDataAsString
随机试题
Thisspecialschoolacceptsalldisabledstudents,______educationallevelandbackground.
指数平滑法中,平滑系数α的取值范围是
适用于各期宫颈癌且疗效较好的是下列哪项
急性乳腺炎细菌侵入的主要途径是
A.淋巴细胞B.中性粒细胞C.嗜酸性粒细胞D.单核细胞E.多核巨细胞李氏杆菌引起的脑膜脑炎中深处的主要炎性细胞是
导致肾病综合征复发及疗效不佳的主要原因是
在建设项目可行性报告中不能满足工程分析的需要时,目前可供选择的方法有()。
下列各项,属于会计核算方法的有( )。
下面关于计算机Cache的论述中,正确的是______。
假设市场上某种商品有两种品牌A和B,当前的市场占有率各为50%。根据历史经验估计,这种商品当月与下月市场占有率的变化可用转移矩阵P来描述:其中p(A→B)是A的市场占有份额中转移给B的概率,依次类推。这样,两个月后的这种商品的市场占有率变化为(1)。
最新回复
(
0
)