首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件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
80
问题
在考生文件夹下有一个工程文件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://www.kaotiyun.com/show/BuLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
假定时钟控件的Interval属性为1000,Enabled属性为True,并且有下面的事件过程,计算机将发出()beep声。SubTimer1_Timer()Fori=1to10BeepNextiEn
CommonDialog控件可以显示()对话框。
执行下面的程序段后,x的值为()。x=50Fori=1To20Step2x=X+i\5Nexti
执行语句Open"TC.dat"ForRandomAs#1Len=50后,对文件TC.dat中的数据能执行的操作是()。
下列操作不能向工程中添加宙体的是()。
阅读下列程序:PrivateSubCommand1_Click()DimiAsInteger,kAsIntegerk=2Fori=1To3PrintH(k);NextiEndSubFunctionH(jAsI
如果A为整数且,|A|>=10,则打印“OK”,否则打印“Error”,表示这个条件的单行格式If语句是()。
文本框TextBox中的内容若要设置为用户不能修改,应设置()属性。
下面程序的功能是产生10个小于100(不含100)的随机正整数,并统计其中5的倍数所占比例,但程序不完整,请补充完整。SubPR()RandomizeDima(10)Fori=1To10a(i)=Int([])If
数据库设计分为以下6个设计阶段:需求分析阶段、______、逻辑设计阶段、物理设计阶段、实施阶段及数据库运行和维护阶段。
随机试题
把下面的六个图形分为两类,使每一类图形都有各自的共同特征或规律,分类正确的一项是:
对肺换气而言,浅快呼吸不利于呼吸,是因为浅快呼吸时
某医师选用万氏牛黄清心丸治疗热入心包,热盛动风征,症见高热烦躁、神昏谵语,此因该成药除清热解毒外,又能
男,45岁,因软组织感染入院,遵医嘱实施肌内注射治疗,为达到无痛注射,以下不正确的是
()是管理伦理原则,它是加强管理组织凝聚力和有效完成组织目标的重要保证。
会计核算应当以实际发生的经济业务为依据,体现了会计核算的真实性和客观性要求。()
outgoforbutforA.Notforourneeds,mindyou,【T1】______ourdemandsB.Ifyou【T2】______amaster’sdegreeC.youcan
在数据库设计器中,建立两个表之间的一对多联系是通过以下______索引实现的。
A、Howtomakeacake.B、Howtomakeomelets.C、Toacceptwhatistaught.D、Toplanafuturecareer.C推理判断题。本题考查Maggie的妈妈所面临的最大挑战
LightingContrastSincethebrightnessrangethattheco]orfilmwillrecordislessthanthatofblack-and-whitefilm,the
最新回复
(
0
)