首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。当程序运行后,单击命令按钮,即可计算出0~100范围内所有偶数的平方和并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算偶数平
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sjt4.frm,在窗体上有一个文本框和一个命令按钮。当程序运行后,单击命令按钮,即可计算出0~100范围内所有偶数的平方和并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算偶数平
admin
2019-08-21
70
问题
在考生文件夹下有一个工程文件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属性设置为
在窗体上有1个名为Cd1的通用对话框,为了在运行程序是时打开保存文件对话框,则在程序中应使用的语句是
窗体上有1个名称为Commandl的命令按钮,事件过程及函数过程如下:PrivateSubCommandl_Click()DimmAsStringm=InputBox("请输入字符串")Printpick_str(m)En
窗体上有1个名称为Commandl的命令按钮,事件过程如下:PrivateSubCommandl_Click()Dimx%,y%,z%x=InputBox("请输入第1个整数"):y=InputBox("请输入第2个整数")DoUnt
编写如下程序:PrivateSubCommandl_Click()DimnAsLong,SAsStringn=InputBox("输入一个数")DoWhilen<>0S=S&nMod10:s=s&n\
在窗体上画一个组合框,其名称为Combol,然后编写如下事件过程:PrivateSubForm_Load()Combol.Text=”1”Fori=1To10Sum=Sum+iNextiCombol.Text=Sum
有如下程序:PrivateSubForm_Click()DimiAsInteger,nAsIntegerFori=1To20i=i+4:n=n+iIfi>10ThenExitForNext
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:PrivateSubCommandl_Click()Dima(10)AsInteger,maxAsIntegerFork=1To10a(k)=Inp
随机试题
依据分组标志反映的事物特征不同,统计分组可分为()
手术中输血发现手术野渗血不止和低血压,最可能的输血并发症为
血细胞分析时最常用的染色方法是
下列叙述错误的是()
妊娠时维持黄体功能的主要激素是()
女性,55岁。高血压20年,不规则服药。某日晨突发头痛,意识不清,30分钟后送到医院。体检:昏迷,血压210/110mmHg,双眼向右侧凝视,左足外旋位。最可能的病变部位是
简述原有的认知结构对迁移的作用。
节能减排是党中央、国务院做出的重大决定部署,是“十一五”时期的一项约束性指标,是一条不可逾越的红线。我们将进一步统一思想,认真贯彻落实党的十七大精神,牢固树立抓节能减排就是落实科学发展观、转变经济发展方式的理念,充分认识节能减排工作的长期性、艰苦性和复杂性
军事上的电子欺骗指的是利用电子设备对己方的相关信息进行伪装或者虚假模拟,欺骗敌方的电子侦察,使敌方对己方部署、作战能力和作战企图等产生错误判断。从而达到迷惑和扰乱敌方的目的。根据上述定义,下列涉及电子欺骗的是()。
Britishpeopledon’tdrinkasmanyteaastheyusedto,butGreat【S1】______Britainstilltakesalmosttwenty-fivep
最新回复
(
0
)