首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件vbsj4.vbp,运行情况如图3-41所示。程序的功能是计算如下:表达式的值:Z=(X+2)^2+(X+3)^3+(x+4)^4+…+(X+N)^N。其中,N和X值通过键盘分别输入到文本框txtN、txtX中。之后如果单击名称
在考生文件夹下有一个工程文件vbsj4.vbp,运行情况如图3-41所示。程序的功能是计算如下:表达式的值:Z=(X+2)^2+(X+3)^3+(x+4)^4+…+(X+N)^N。其中,N和X值通过键盘分别输入到文本框txtN、txtX中。之后如果单击名称
admin
2016-01-31
35
问题
在考生文件夹下有一个工程文件vbsj4.vbp,运行情况如图3-41所示。程序的功能是计算如下:表达式的值:Z=(X+2)^2+(X+3)^3+(x+4)^4+…+(X+N)^N。其中,N和X值通过键盘分别输入到文本框txtN、txtX中。之后如果单击名称为cmdCal、标题为“计算”的命令按钮,则计算表达式的值Z,并将计算结果显示在名称为lblResult的标签中。在给出的窗体文件中已经添加了全部控件和程序,但程序不完整。要求去掉程序中的注释符,把程序中的“?”改为正确的内容。
注意:考生不得修改窗体文件中已经存在的程序。程序中不得使用^运算符,而应使用函数xn进行幂运算。程序至少运行一次,按照下图输入数据,使N=5,X=10,单击“计算”按钮,计算Z的值,并将结果显示在标签lblResult中,否则没有成绩。最后,程序按原文件名存盘。
程序源码:
PriVate Function xn(a As Single, m As Integer)
Dim i As Integer
tmp=1
For i=1 To m
′ tnap=?
Next
′xn=?
End Function
Private Sub cmdCal_Click()
Dim n As Integer, i As Integer
Dim t As Single,s, X As Single
n=Val(txtN.Text)
x=Val(txtX.Text)
z=0
For i=2 To n
t=x+i
′ z=z+?
Next
′lblResult.Caption=?
Call SaveResult
End Sub
PriVate Sub SaveResult()
Open App.Path & "\out4.dat" For
Output As #1
Print #1, lblResult.Caption
Close #1
End Suh
选项
答案
审题分析 本题源程序中,自定义函数xn的功能是进行a^m幂运算,它通过For循环连续m次将a乘以累积变量tmp(初值为1)来实现。故自定义函数xn中第一个?处应改为:tmp*a,作为函数返回值第二个?处应改为:tmp。 在“计算”按钮的单击事件过程中,根据程序所要计算:表达式的特点,源程序利用一个For循环依次计算表达式中各项的值((x+i)^i),并将其累加入变量z。计算表达式中各项的值通过调用自定义函数xn(t,i)来实现的,其中t=x+i。故cmdCal_Click事件过程中第一个?处应改为:xn(t,i)。计算结果显示在标签中,故第二个?处应改为:z。 操作步骤 步骤1:打开考生文件夹中的本题工程文件vbsj4.vbp,在代码编辑窗口,去掉程序中的注释符“′”,将问号“?”改为正确的内容。 参考代码: tmp=tmp*a xn=tmp z=z+xn(t,i) lblResult.Caption=z 步骤2:按
键运行程序,在第1个文本框中输入5,第2个文本框中输入10,然后单击“计算”按钮。 步骤3:按要求将文件保存至考生文件夹中。 考点链接 Sub过程和函数过程、参数传递。
解析
转载请注明原文地址:https://kaotiyun.com/show/BuLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个命令按钮和一个文本框,然后编写命令按钮的Click事件过程。程序运行后,在文本框中输入一串英文字母(不区分大小写),单击命令按钮,程序可找出未在文本框中输入的其他所有英文字母,并以大写方式降序显示到Text1中,例如,若在Tcxt1中输入的是
使用代码从VB6.0列表框删除所有项目,使用的方法是_____。
3在文本框Textl中输入一个键盘键,将会发生4个事件,这4个事件的顺序是()。
控件是()。
以下()操作不能打开属性窗口
下列程序弹山对话框中按钮的个数为______。MsgBox"确认!",vbAbortRetryIgnore+vbMsgBoxHelpButton+vbQuestion,"提示"
有下列函数过程:FunctionFunc2(aAsInteger,bAsInteger)AsIntegerStaticmAsInteger,iAsIntegerm=0i=2a=i+m+1b=i+a+bFunc2=mEnd
Sub过程与Function过程最根本的区别是()。
假定有一个菜单项,名为Menuhem,为了在运行时使该菜单项失效(变灰),应使用的语句为
随机试题
________主张的“政策议题网络”。()
街头赠阅和邮寄赠阅的送达方式是()
一患者戴用全口义齿1年,一直未吃硬性食物。小心谨慎使用。但上总义齿仍裂开,查:上总义齿前份正中折裂。固位好。腭侧基托厚2mm,腭中缝较平,造成义齿折裂的主要原因是
(2007年)热能转换成机械能的唯一途径是通过工质的体积膨胀,此种功称为容积功,它可分为()。
对逻辑表达式的化简结果是()。
业主将一个建设项目的所有工程设计任务一次性全部委托给一个设计单位或由几个单位组成的联合体(合作体),此种模式是( )。
儿童画没有原始艺术的那些历史复载,但在形式体验上有许多相似之处。儿童有一种未被扭曲的直觉,充满好奇心和新鲜感,能够将自己感兴趣的特征强烈地表现出来。儿童凭感性作画,直取主要印象,还有那无拘无束的想象力。早期的儿童是自我中心主义者,儿童毫不顾忌地表现自己的感
民事、行政枉法裁判罪的主体有()。
Couldthebadolddaysofeconomicdeclinebeabouttoreturn?SinceOPECagreedtosupply-cutsinMarch,thepriceofcrudeoil
Apsychologicalissuethatbegantobediscussedinthe1950swasthequestionofthemostappropriateageforsecondlanguagel
最新回复
(
0
)