首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件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
94
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
为了使模块尽可能独立,要求
以下程序用于计算“1+1/3+1/5+…+1/(2n+1)”,直至“1/(2n+1)”小于10-4。阅读下面程序,请在【】和【】处填上正确内容。PrivateSubCommand1_Click()Sum=h:n=idon=【
属性窗口分为4个部分,这4个部分分别是______。
执行如下程序段后,intsum的值为______。PrivateSubCommand1_Click()sum=0Fori=1To18Step2Forj=2To6If(iModj)<>0Thensum=sum+jNex
在窗体上画一个命令按钮,名称为Command1,然后编写如下事件过程:OptionBase0PrivateSubCommand1_Click()DimcityAsVariant
在进行模块测试时,要为每个被测试的模块另外设计两类模块:驱动模块和承接模块(桩模块)。其中______的作用是将测试数据传送给被测试的模块,并显示被测试模块所产生的结果。
在窗体上画一个命令按钮command1和两个文本框,名称分别为Text1和Text2。编写如下两个事件过程:DimStr1AsString,str2AsStringPrivateSubform_load()Tex
下列关于文件的叙述中,错误的是()。
随机试题
视神经记录到的视觉动作电位和听神经上记录到的听觉动作电位()
药物配伍中,体现"补血而不滞血"者为药物配伍中,体现"和血而不伤血"者为
下列说法正确的有()
考察检验检测机构场所,主要是完成对检验检测机构()过程。
以下适于需求价格弹性大小与销售收入的论述中,正确的是()。
小学阶段儿童思维的特点是()。
学习所引起的行为或行为潜能的变化是相对短暂的。()
红外线是太阳光线中众多不可见光线的一种,由德国科学家霍胥尔于1800年发现。它之所以不能被人看到是因为()。
已知关系R(A,B,C),有定义索引的语句:createuniqueclusteredindexidx1onR(B)。下列关于idx1的说法,正确的是()。
Weoftenhearthe【B1】______,"Everybodytalksaboutweather,butnobodydoesanythingaboutit."Thisisreallynot【B2】______tod
最新回复
(
0
)