首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sit4.frm,在窗体上有一个文本框和一个命令按钮。当程序运行后,单击命令按钮,即可计算出0~100范围内所有偶数的平方和,并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算偶数
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sit4.frm,在窗体上有一个文本框和一个命令按钮。当程序运行后,单击命令按钮,即可计算出0~100范围内所有偶数的平方和,并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算偶数
admin
2020-08-10
50
问题
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sit4.frm,在窗体上有一个文本框和一个命令按钮。当程序运行后,单击命令按钮,即可计算出0~100范围内所有偶数的平方和,并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算偶数平方和的操作在通用过程Fun中实现,请编写该过程的代码。
要求:请勿改动程序中的任何内容,只在Function Fun( )和End Function之间填入你编写的若干语句,最后将修改后的文件按原文件名存盘。
选项
答案
根据题意,通过For循环语句的循环变量i(初值为0,终值为100,步长为2)来获得0~100范围内的所有偶数,并逐一将i^2的值累加到变量s,最后将s的值显示在文本框中,并将其作为函数返回值。 步骤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 T0 100 if i Mod 2=O Then s=s+i^2 End If Next i Fun=s End Function 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/8SHp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列关于利用通用对话框产生的文件对话框的相关属性的描述中,错误的是
在窗体上画一个命令按钮和一个标签,其名称分别为Commandl和Labell,然后编写如下事件过程:PrivateSubCommandl_Click()Dimarr(10)Fori=6To10arr(i)=i一5NextiLa
在窗体上画一个名称为List1的列表框,然后编写如下程序:PrivateSubForm_Click0Fori=1To10Item=”Item”&i:Listl.Addltem
设有窗体的FormMouseMove事件过程如下:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)If
在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1),程序运行后,在文本框中每输入一个字符,都会立即在标签中显示文本框中字符的个数。以下可以实现上述操作的事件过程是
下面哪个属性肯定不是框架控件的属性
下列选项中不属于结构化程序设计方法的是
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。以下程序的功能是从顺序文件中读取数据:PrivmeSubCommand1_Click()DimslAsString,s2AsString
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是
随机试题
下列属于亲社会行为的是()。
WritingaJobApplicationYourapplicationisthefirstcontactyouwillhavewithanemployer.Theemployerwilluseitto
改良
关于康德的法哲学理论,下列说法错误的是
下列何肌收缩使瞳孔转向外上()
下列属于法律意识范畴的是:()。
各种商品的需求弹性不同:为了揭示商品价格弹性高低,可以根据弹性系数的绝对值的大小进行比较,当|Ed|=0,称需求为()。
某工业引进项目,基础数据如下:(1)项目的建设前期年限为1年,建设期为2年,该项目的实施计划为:第一年完成项目全部投资的40%,第二年完成60%,第三年项目投产并且达到100%设计生产能力,预计年产量为3000万吨。(2)全套设备拟从
假设输入,一句英语句子:“Iamastudent”,要求输出“student.aamI”。也就是说以单词为基本单位将句子中的所有单词翻转过来。请实现一个时间和空间上尽可能高效率的算法,将句子中所有的单词翻转过来。要求:根据设计思想,采用C、C
AirlineAlliancesCooperativecompetition.Competitivecooperation.Confused?Airlineallianceshavetravelersscratchingtheir
最新回复
(
0
)