首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。当程序运行后,单击命令按钮,即可计算出0~100范围内所有偶数的平方和并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算偶数平
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。当程序运行后,单击命令按钮,即可计算出0~100范围内所有偶数的平方和并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算偶数平
admin
2019-08-21
60
问题
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。当程序运行后,单击命令按钮,即可计算出0~100范围内所有偶数的平方和并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算偶数平方和的操作在通用过程Fu中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在Function Fun()和End Function之间填入你编写的若干语句。最后将修改后的文件按原文件名存盘。
选项
答案
步骤1:打开本题工程文件。 步骤2:分析并编写程序代码。 程序提供代码 Sub SaveData() Open App.Path&"\&"outtxt.txt"For Output As#1 Print#1.Text1.Text Close#1 End Sub Function Fun() End Function Private Sub Command1_Click() d=Fun() Text1.Text=d SaveData End Sub 程序结束 参考答案 Function Fun() Dim s As Long.i As Integer。 s=0 For i=0 To 100 If i Mod 2=0 Then s=s+i^2 End If Next i Fun=s End Function 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
根据题意,通过For循环语句的循环变量i(初值为0,终值为100,步长为2)来获得0~100范围内的所有偶数,并逐一将i^2的值累加到变量s,最后将s的值显示在文本框中,并将其作为函数返回值。
转载请注明原文地址:https://kaotiyun.com/show/JKUp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体画一名为CommonDialog1,则下列与CommonDialog1.ShowOpen方法等效的语句是
在窗体上画一个通用对话框,程序运行中用ShowOpen方法显示“打开”对话框时,希望在该对话框的“文件类型”栏中只显示扩展名为DOC的文件,则在设计阶段应把通用对话框的Filter属性设置为
为使程序运行时通用对话框CD1上显示的标题为“对话框窗口”,若通过程序设置该标题,则应使用的语句是
在窗体上有1个名为Cd1的通用对话框,为了在运行程序是时打开保存文件对话框,则在程序中应使用的语句是
设菜单编辑器中各菜单项的属性设置如下表所示针对上述属性设置,以下叙述中错误的是
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivateSubCommandl_Click()Dimx%,y%,z%x=InputBox("请输入第1个整数"):y=InputBox("请输入第2个整数")DoUnt
编写如下程序:OptionBase1PrirateSubCommandl_Click()Dimaa=Array(1,2,3,4):s=0:j=1Fori=4To1Step-1s=s+a(i)*j:j=j*10Ne
窗体上有一个名称为Optionl的单选按钮数组,程序运行时,当单击某个单选按钮时,会调用下面的事件过程PrivateSubOptionl_Click(IndexAsInteger)…EndSub下面关于此过程的参数Index的叙
随机试题
关于鼻腔的叙述,错误的是
牙体缺损的修复体,设计时不属非考虑不可的因素是
下列哪项不是至宝丹的功用()
鼓式干燥适于干燥的对象是
发包单位可以在报价竞争状态下确定项目的总造价,可以较早确定或者预测工程成本。这体现了__________的特点。()
当高层建筑最低消火栓栓口处的静水压力不大于1.0MPa时,可采用()。
募集机构可以向()推介私募基金。
当存在无风险资产并可按无风险报酬率借贷时,下列关于最有效风险资产组合的说法中正确的是()。
甲股份有限公司(简称“甲公司”)于2015年3月1日在深圳证券交易所(简称“深交所”)首次公开发行股票并上市(简称“IP”),2016年1月,中国证监会(简称“证监会”)接到举报称,甲公司的招股说明书中有财务数据造假行为。证监会调查发现,在甲公司IPO过程
在地震面前,科学还是大有作为的。通过对地震波的研究,人们发现地震波包括纵波和横波,前者传播速度更快,但破坏力较小,而后者则相反。因此,人们通过地震监测台网,监测到传播速度更快的地震波纵波,向监测中心发出信号,监测中心即可通过客户端用无线电波向公众和重点设施
最新回复
(
0
)