首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
(1)在考生文件央下有一个工程文件sit3.vbp,窗体中柯两个图片框,名称分别为P1、P2,其中的图片内容分别是-架航天飞机和一朵云彩,一个命令按钮,名称为C1,标题为“发射”,还有一个计时器,名称为Timer1。并给出了两个事件过程,但并不完整,要求:
(1)在考生文件央下有一个工程文件sit3.vbp,窗体中柯两个图片框,名称分别为P1、P2,其中的图片内容分别是-架航天飞机和一朵云彩,一个命令按钮,名称为C1,标题为“发射”,还有一个计时器,名称为Timer1。并给出了两个事件过程,但并不完整,要求:
admin
2016-09-06
47
问题
(1)在考生文件央下有一个工程文件sit3.vbp,窗体中柯两个图片框,名称分别为P1、P2,其中的图片内容分别是-架航天飞机和一朵云彩,一个命令按钮,名称为C1,标题为“发射”,还有一个计时器,名称为Timer1。并给出了两个事件过程,但并不完整,要求:
①设置Timer1的属性,使其在初始状态下不计时;
②设置Timer1的属性,使其每隔0.1秒调用Timer事件过程一次;
③去掉程序中的注释符,把程序中的?改为正确的内容,使得在运行时堆击“发射”按钮,则航天飞机每隔0,1秒向上多动一次,当到达P2的下方时停止移动,如图所示。
注意:小能修改程序中的其他部分。最后把修改后的文件按原文件名存盘。
(2)在考生文件夹下有一个工程文件sjt4.vbp,运行情况如图所示。程序的功能是计算下列表达式的值:
z=(x+2)^2+(x+3)^3+(x+4)^4+…+(x+N)^N
其中N和x的值通过键盘分别输入到文本框Text1、Text2中。之后如果单击标题为“计算”、名称为Command1的命令按钮,则计算表达式的值z,并将计算结果显示在名称为Label1的标签中。
在给出的窗体文件中已经添加了全部控件和程序,但程序不完整。要求去掉程序中的注释符,把程序中的?改为正确的内容。
注意:考生不得修改窗体文件中已经存在的程序。程序中不得使用运算符,而应使用函数xn进行幂运算。程序至少运行一次,按照下图输入数据,使X=10,N=5,单击“计算”按钮,计算Z的值,并将结果显示在标签Label1中,否则没有成绩。最后,程序按原文件名存盘。
选项
答案
(1)【操作步骤】 步骤1:按题目要求打开工程文件,设置计时器属性,如图3.14所示。 [*] 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容。 参考答案 Private Sub C1_Click() Timer1.Enabled=True’单击"发射"按钮,则Timer生效 End Sub Private Sub Timer1_Timer() Static a% a=a+1 If P1.Top>P2.Top+P2.Height Then’判定P1是否接触到P2 P1.Move P1.Left,P1.Top-5-a, P1.Width,P1.Height E1Se Timer1.Enabled=False’当P1接触到P2时Timer事件停止 End If End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。 (2)【操作步骤】 步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 参考答案 Private Function xn(a As Single,m As Integer) Dim i As Integer trnp=1 For i=1 To m tmp=tmp*’求a
1
的结果 Next xn=tmp’返回计算结果 End Function Private Sub Commandl_Click() Dim n As Integer Dim i As Integer Dim t As Single Dim S,x AS Single n=Val(Text1.Text)’将敷字字符转换为数值 x=Val(Text2.Text)’读取n.x m值 z=0 For i=2 To n t=X+i z=z+xn(t,i)’调用xn函数求t
1
Next Label1.Caption=z’将结果显示在Label1 Cal1 SaveResult End Sub Private Sub SaveResult() Open App.Path&"\out4.dat"For Output Open App.Path&"\out4.dat"For Output AS #1 Print #1,Label1.Caption Close#1 End Sub 步骤3:按照题目要求调试并运行程序,如图3.15所示。 [*] 步骤4:关闭程序后,按照题目要求保存工程和窗体。
解析
转载请注明原文地址:https://kaotiyun.com/show/NZLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() c=1234 c1=Trim(Str(c)) Fori=1To4 Pri
以下程序的功能是:将一维数组A中的100个元素分别赋给二维数组B的每个元素并打印出来,要求把A(1)到A(10)依次赋给B(1,1)到B(1,10),把A(11)到A(20)依次赋给B(2,1)到B(2,10),……,把A(91)到A(100)依次赋给B(
设用复制、粘贴的方法建立了一个命令按钮数组Command1,以下对该数组的说法错误的是
为了能自动放大或缩小图像框中的图形与图像框的大小相适应,必须把该图片框的Stretch属性设置为______。
在窗体上绘制一个名称为Command1的命令按钮,然后编写如下通用过程和命令按钮的事件过程:PrivateFunctionfun(ByValmAsInteger) IfmMod2=0Then fun=2
下面四个选项,不是窗体属性的是()。
下面的数组声明语句中()是正确的。
LOF函数的功能是返回某文件的字节数,LOF(2)是返回______。
需求分析阶段的任务是()。
随机试题
男性,39岁,反复发作性头痛、心悸、出汗3年,再发1小时急诊入院。检查发现面色苍白,血压200/130mmHg,心率136次/分。若患者测血压持续在200/130mmHg,下列哪项检查对诊断有帮助
有关地西泮(安定)的叙述错误的是
治疗心绞痛急性发作,应首选
下面四个选项中,说法不正确的一项为()。
规避办理施工许可证应承担的法律责任是()。
资产、负债、所有者权益等会计要素指标,主要是通过()来实现的。
一次还本付息的债券,其终值为债券的本利和。( )
企业自行建造固定资产过程中,下列各项应在“在建工程—待摊支出”科目核算的有()。
根据我国宪法修正案,在爱国统一战线中新增加的社会阶层是()。
随着世界人口的急剧增长,许多人纷纷发出警告:地球将无法养活超过100亿的人口。然而,一些乐_观的人士反对这种_________的说法。他们认为,虽然陆地上可耕地的开发已近__________,但地球还有广阔的海洋可供开发,大海完全有可能成为人类未来的粮仓。
最新回复
(
0
)