首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生目录下有一个工程文件sjt3.vbp。窗体上有个钟表图案,其中代表指针的直线的名称是Line1,还有一个名称为Label1的标签,和其他一些控件,如图3—172(a)所示。在运行时,若用鼠标左键单击圆的边线,则指针指向鼠标单击的位置,如图3—1
(1)在考生目录下有一个工程文件sjt3.vbp。窗体上有个钟表图案,其中代表指针的直线的名称是Line1,还有一个名称为Label1的标签,和其他一些控件,如图3—172(a)所示。在运行时,若用鼠标左键单击圆的边线,则指针指向鼠标单击的位置,如图3—1
admin
2019-06-11
40
问题
(1)在考生目录下有一个工程文件sjt3.vbp。窗体上有个钟表图案,其中代表指针的直线的名称是Line1,还有一个名称为Label1的标签,和其他一些控件,如图3—172(a)所示。在运行时,若用鼠标左键单击圆的边线,则指针指向鼠标单击的位置,如图3—172(b)所示;若用鼠标右键单击圆的边线,则指针恢复到起始位置,如图3—172(a)所示;若鼠标左键或右键单击其他位置,则在标签上显示“鼠标位置不对”。文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的“?”改为正确的内容。程序中的oncircle函数的作用是判断鼠标单击的位置是否在圆的边线上(判断结果略有误差),是则返回True,否则返回False。符号常量x0、y0是圆心距窗体左上角的距离;符号常量radius是圆的半径。
注意:不能修改程序中的其他部分和各控件的属性。最后把修改后的文件按原文件名存盘。
(2)在考生目录下有一个工程文件sjt4.vbp,窗体如图3—173所示。其功能是单击“输入数据”按钮,则可输入一个整数,n(要求:8≤n≤12);单击“计算”按钮,则计算1!+2!+3!+…+n!,并将计算结果显示在文本框中;单击“存盘”按钮,则把文本框中的结果保存到考生目录下的out4.dat文件中。文件中已经给出了所有控件和程序,但程序不完整,请去掉程序中的注释符,把程序中的“?”改为正确的内容,并编写“计算”按钮的Click事件过程。
注意:不得修改已经存在的内容和控件属性,在结束程序运行之前,必须用“存盘”按钮存储计算结果,否则无成绩。最后把修改后的文件按原文件名存盘。
选项
答案
第1小题 步骤1:打开本题工程文件sjt3.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: Line1.Y2=Y Line1.X2=Line1.X1 Line1.Y2=y0-750 Label1.Caption="鼠标位置不对" 步骤2:按要求将文件保存至考生文件夹中。 第2小题 步骤1:打开考生文件夹中的本题工程文件sjt4.vbp,在代码编辑窗口,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: s=1 f=s 步骤2:双击“计算”按钮,编写该按钮的单击事 件过程。 参考代码: Private Sub Command2_Click() Dim s As Long,k As Integer ’考生应编写的程序 s=0 For k=1To n s=s+f(k) Next Text1=s End Sub 步骤3:按<F5>键运行程序,单击“输入数据”按钮,通过输入框输入一个8~12之间的整数,然后单击“计算”按钮计算结果,最后单击“存盘”按钮保存结果。 步骤4:按要求将文件保存至考生文件夹中。
解析
第1小题:本题源程序在Form MouseDown事件过程中,先通过调用函数oncircle(X,Y)以判断鼠标单击的位置是否在圆的边线上,若在边线上,则接着判断当前按下的是否为鼠标左键,若为左键,则将直线Line1的终点位置设置为当前鼠标单击的位置,故第一个?处应改为:Y;若当前按下的不是左键,则直线Line1的终点位置设置为其原始位置,即Line1.X2=Line1.X1、Line1.Y2=y0-750。若鼠标单击的位置不在圆的边线上,则在标签上显示相关信息,故第4个?处应改为:Label1.Caption。
第2小题:本题源程序中,自定义函数f的功能是进行n!阶乘运算,它通过For循环连续n次将循环变量k的值乘以累积变量s(第一个?处s初值应为1)来实现,作为函数返同值第二个?处应改为:s。
在“计算”按钮的单击事件过程中,根据程序所要计算表达式的特点,源程序利用一个For循环依次计算表达式中各项的值并将其累加入变量s,计算表达式中各项的值通过调用白定义函数f(k)来实现的,最终计算结果显示在文本框中。
转载请注明原文地址:https://kaotiyun.com/show/WAUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
语句Dima(-3To4,3To6)AsInteger定义的数组的元素个数是
如果要定义一个窗体级变量,定义变量语句的位置应该是
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序:PrivateTypeRecordIDAsInteger:NameAsString*20EndTypePrivateSubCommand1_Click()DimM
下面关于VB数据文件的叙述中错误的是
VisualBasic中的“启动对象”是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic“启动对象”的描述中,错误的是
假定有以下通用过程:FunctionFun(nAsInteger)AsIntegerx=n*n:Fun=x-11EndFunction在窗体上画一个命令按钮,其名称为Command1,然后编写如下事件过程:PrivateSubCom
以下关于过程的叙述中,错误的是
假设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是()。
下列叙述中,不属于软件需求规格说明书的作用的是()。
在考生目录下有一个工程文件sit5.vbp。窗休左边的图片框名称为Picturel,框中还有六个小图片框,它们是一个数组,名称为Pic,住窗体右边从上到下有三个显示不同物品的图片框,名称分别为Picture2、Picture3、Picture4,还有一个文
随机试题
要使三相异步电动机反转,只需改变()。
Themeaningofthetrueidiomcan’tbededucedfromthoseofthe______constituents.
在施工阶段,按照《公路桥梁和隧道工程施工安全风险评估指南(试行)》要求,须进行施工安全风险评估的项目是()。
按CIF术语签订的合同,如卖方愿意承担卸货费,可以选用()。
根据劳动合同法律制度的规定,下列关于试用期的表述中,正确的有()。
下列关于战略表述的选项中,错误的有()。
六西格玛是20世纪80年代中期由美国摩托罗拉公司创立的一种()的方法。
签发人签发公文,应当签署意见、姓名和完整日期;圈阅的,视为不同意。()
某校和某工厂之间有一条公路,该校下午2时派车去该厂接某劳模来校作报告,往返需用1小时。这位劳模在下午1时便离厂步行向学校走来,途中遇到接他的汽车,便立刻上车驶向学校,在下午2时40分到达。问:汽车速度是劳模步行速度的几倍?
DearSir,MickeyMouseisoneoftheleadingcompaniesintoysretailbusinesslocatedintheUnitedKingdomofBritain.We
最新回复
(
0
)