首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sit4.frm,在窗体上有一个文本框和一个命令按钮。当程序运行后,单击命令按钮,即可计算出0~100范围内所有偶数的平方和,并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算偶数
在考生文件夹下有一个工程文件sjt4.vbp,相应的窗体文件为sit4.frm,在窗体上有一个文本框和一个命令按钮。当程序运行后,单击命令按钮,即可计算出0~100范围内所有偶数的平方和,并显示在文本框中。在窗体的代码窗口中,已给出了部分程序,其中计算偶数
admin
2020-08-10
44
问题
在考生文件夹下有一个工程文件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
在窗体上画一个名称为Commandl的命令按钮,并编写如下程序:OptionBase1PrivateSubCommandl_Click()Dima(4,4)Fori=1To4
用语句Open”C:\teac.txt”ForInputAs#打开文件后,就可以编程序
设有窗体的FormMouseMove事件过程如下:PrivateSubForm_MouseMove(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)If
编写如下程序:PrivateSubCommandlCliek()Dim.str1AsString,str2AsStringstr1=InputBox(“输入一个字符串”):subfstr1,str2:Printstr2
以下关于文件的叙述中,错误的是
窗体上有1个名称为Text1、内容为空的文本框。编写如下事件过程:PrivateSubText1_KeyUp(KeyCodeAsInteger,ShiftAsInteger)PrintText1.Text;EndSub运行程序,并在
设窗体上有一个列表框控件List1,含有若干列表项。以下能表示当前被选中的列表项内容的是
设有如下程序:PrivateSUbFormClick().num=InputBox(“请输入一个实数”):P:InStr(num,“.”)Ifp>0ThenPrintMid(num,P+1)Prim“END”EndIf运行程序单击窗
随机试题
(2013年真题)在婚姻关系存续期间所得的下列财产,归夫或妻一方所有的是
酶抑作用最强的药物是
正常情况下,最易引起牙本质敏感症的釉牙骨质界结构为
在折射率n3=1.52的照相机镜头表面涂有一层折射率n2=1.38的MgF2增透膜,若此膜仅适用于波长为550nm的黄光,则此膜的最小厚度是()。
某大底盘单塔楼高层建筑,主楼为钢筋混凝土框架一核心筒,与主楼连为整体的裙房为混凝土框架结构,如图6-15所示。本地区抗震设防烈度为7度,建筑场地为Ⅱ类。假定该房屋为乙类建筑,试问:裙房框架结构用于抗震措施的抗震等级,应如下列何项所示。并简述其理由。
制定工程项目计划的主要步骤的先后顺序是()。(1)把工程项目范围详细划分为各个工作包;(2)进行资源消耗和评审;(3)清晰地定义工程项目目标;(4)确定质量检查评审的关键节点和质量检查。
车间管理人员工资应纳入“管理费用”核算。()
(2013年)担保物权的法律特征有()。
合伙人在合伙企业清算前,不得请求分割合伙企业的财产;但是,法律另有规定的除外。()
AccordingtoanArabicstory,coffeewasdiscoveredwhenamannamedKaldinoticedthathisgoatswereattractedtotheredfrui
最新回复
(
0
)