首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。程序功能为:在文本框Text1中输入一个正整数N后,单击“计算”按钮,则计算11+22+33+…+NN,并将计算结果显示在Text2中。程序中的函数f可以计算。mm的值。 在给出的窗体文件中已经有了全部控件,但
在考生文件夹下有一个工程文件sjt5.vbp。程序功能为:在文本框Text1中输入一个正整数N后,单击“计算”按钮,则计算11+22+33+…+NN,并将计算结果显示在Text2中。程序中的函数f可以计算。mm的值。 在给出的窗体文件中已经有了全部控件,但
admin
2017-03-27
59
问题
在考生文件夹下有一个工程文件sjt5.vbp。程序功能为:在文本框Text1中输入一个正整数N后,单击“计算”按钮,则计算1
1
+2
2
+3
3
+…+N
N
,并将计算结果显示在Text2中。程序中的函数f可以计算。m
m
的值。
在给出的窗体文件中已经有了全部控件,但程序不完整。要求:去掉程序中的注释符,把程序中的“?”改为正确的内容,并编写相应的程序,实现程序的功能,并且必须在运行时计算N=8时的结果。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,必须计算N=8时的结果,否则无成绩。
选项
答案
步骤1:打开考生文件夹下的工程文件sjt5.vbp,在码编辑窗口的指定位置输入以下代码。 参考代码: Private Sub Command1_Click() ’======考生编写程序开始====== Dim i,j As Integer,k As Long i=Text1.Text k=0 For j=1To i k=k+f(j) Next Text2.Text=k ’======考生编写程序结束====== Open App.Path&"\out5.dat"For Output As#1 Print#1,Text1,Text2 Close#1 End Sub 步骤2:在代码编辑窗口中,去掉程序中的注释符“’”,将问号“?”改为正确的内容。 参考代码: s=1 s=s*m f=s 步骤3:按<F5>键运行程序,在文本框中输入8,单击“计算”按钮。 步骤4:按要求将文件保存至考生文件夹中。
解析
函数f利用一个For循环来计算m的m次幂,需要先设置一个累乘积变量初值为1,然后循环m次,在循环中每次在累乘积上乘以m。循环结束时将累乘积作为函数返回值。
在“计算”按钮的单击事件中,要求一个数列的累加和,需要先设置累加和变量初值为0,然后使用For循环循环n次,在每次循环中为累加和变量累加f(j),循环结束后累加和变量的值即为所求。
转载请注明原文地址:https://kaotiyun.com/show/qmGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列每组控件中,都包含有滚动条的一组控件是
属性窗口分为4个部分,这4个部分分别是______。
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:OptionBase0PrivateSubCommand1_Click()DimcityAsVariant
要使目录列表框(名称为Dir1)中的目录随着驱动器列表框(名称为Drive1)中所选择的当前驱动器的不同而同时发生变化,则应:
在下面向文件中写入数据的命令语句中,不正确的是______。
下列程序段的执行结果为______。X=2Y=1IfX*Y<1ThenY=Y-1ElseY=-1PrintY-X>0
如果要在菜单中添加一个分隔线,则应将其Caption属性设置为
如果在程序中要将c定义为静态变量,且为整型数,则应使用的语句是
执行下面的程序段后,S的值为【】。s=5Fori=2.6To4.9Step0.6s=s+1Nexti
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()a$="321":b$="abc"Forj=1To5PrintMid$(a$,6-j,1)+Mid$(b$,
随机试题
However,therearestillthousandsofyoungpeoplewhofindithardtofindajobinthatcountry.
胸骨自上而下分为_______、_______、_______三部分。
可摘局部义齿后牙排列,容易引起咬颊的原因是
男,35岁,已婚。因尿道口有脓性分泌物到医院就诊,被诊断为淋病。为防止该病传染给患者妻子,医师符合伦理的最佳做法是
对于二手个人住房贷款,商业银行最主要的合作单位是房地产经纪公司。()
2009年5月18日,甲从商场买回一件缺陷产品且造成了损害,则甲提起诉讼要求商场赔偿的实效期限为()。
甲汽车制造公司准备到发展中国家M国投资,对M国诸多条件进行了认真的调查分析,以下分析内容不属于钻石模型要素的是()。(2013年)
当前共青团工作面临哪些挑战?
Aschildrengetolder,self-disciplineshouldtaketheplaceofimposeddiscipline.Constrainsbecomeinternalizedandchildren
Whensheheardthebadnews,she______completely.
最新回复
(
0
)