首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt5.vbp。程序功能为:在文本框Textl中输入一个正整数N后,单击“计算”按钮,则计算11+22+33+…+NN,并将计算结果显示在Text2中。程序中的函数f可以计算mm的值。 在给出的窗体文件中已经有了全部控
在考生文件夹下有一个工程文件sjt5.vbp。程序功能为:在文本框Textl中输入一个正整数N后,单击“计算”按钮,则计算11+22+33+…+NN,并将计算结果显示在Text2中。程序中的函数f可以计算mm的值。 在给出的窗体文件中已经有了全部控
admin
2020-02-27
87
问题
在考生文件夹下有一个工程文件sjt5.vbp。程序功能为:在文本框Textl中输入一个正整数N后,单击“计算”按钮,则计算1
1
+2
2
+3
3
+…+N
N
,并将计算结果显示在Text2中。程序中的函数f可以计算m
m
的值。
在给出的窗体文件中已经有了全部控件,但程序不完整。要求:去掉程序中的注释符,把程序中的?改为正确的内容,并编写相应的程序,实现程序的功能,并且必须在运行时计算N=8时的结果。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。程序调试通过后,必须计算N=8时的结果,否则无成绩。
选项
答案
【操作步骤】 步骤1:打开考生文件夹下的本题工程文件sjt5.vbp,在码编辑窗口的指定位置输入以下代码: 参考代码: Private Sub Commandl—Click() ====考生编写程序开始==== Dim i,j As Integer,k As Long i=Textl.Text k=0 For j=1 To i k=k+f(j) Next Text2.Text=k ====考生编写程序结束==== Open App.Path&”\out5.dat”ForOutput As#1 Print#1,Text1,Text2 Close#1 End Sub 步骤2;在代码编辑窗口中,去掉程序中的注释符“”’,将问号“?”改为正确的内容。 参考代码: s=1 S=S★m f=s 步骤3:按要求将文件保存至考生文件夹中。 步骤4:按
键运行稗序,在文本框中输入8,单击“计算”按钮。
解析
转载请注明原文地址:https://kaotiyun.com/show/6XTp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设工程中有Form1、Form2两个窗体,要求单击Form2上的Command1命令按钮,Form2就可以从屏幕上消失,下面的事件过程中不能实现此功能的是( )。
数据库技术的根本目标是()。
以下数列:1,1,3,5,9,15,25,41,…的规律是从第三个数开始,每个数是它前面两个数的和加1。在考生目录下有一个工程文件sjt5.vbp。窗体中已经给出了所有控件,如图所示。请编写适当的事件过程实现以下功能:在Text1中输入整数40,
结构化程序设计的3种结构是()。
下列叙述中正确的是()。
下列叙述中正确的是
窗体上有一个名称为VScroll1的垂直滚动条,为了设定单击滚动条两端箭头时的Value增量值,应设置的属性是
设在工程文件中有一个标准模块,其中定义了如下记录类型:TypeBooksNameAsString*10TelNumAsString*20EndType在窗体上画一个名为Command1的命令按
下面不能作为结构化方法软件需求分析工具的是
数据库中对概念模式内容进行说明的语言是
随机试题
________是属于国际货币基金组织创设的特有国际储备资产。
女性,59岁,被汽车碾压骨盆后3小时而送至医院。查体:病人谵妄,皮肤发紫,四肢厥冷,血压60/40mmHg,脉搏细速。目前需首先处理的是
以下哪一项不属于男性尖锐湿疣的临床表现()
患者,女,40岁。妊娠30周,胎儿畸形,入院行引产术,婚育史:G4P1。查体:T37.5℃,BP135/80mmHg。实验室检查:Hb73g/L,WBC8.2×109/L,Plt200×109/L,ABO血型为A型,Rh血型的D抗原缺乏。术前为
会计资料的()是会计资料最基本的质量要求,是会计工作的生命。
下列不属于金融期货的有()。
俄亥俄大学研究得出领导行为的维度包括()。
Ithinkthereareonlyafewsportsthatareboth_________and___________.
上前牙切缘至下前牙唇面的水平距离超过多少才称为前牙深覆盖()。
Amanescapedfromtheprisonlastnight.Itwasalongtime____theguardsdiscoveredwhathadhappened.
最新回复
(
0
)