首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读入数据”、“计算并输出”和“存盘”),然后画一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars 属性设置为2)(如图1-262所示)。程序运行
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读入数据”、“计算并输出”和“存盘”),然后画一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars 属性设置为2)(如图1-262所示)。程序运行
admin
2018-12-05
50
问题
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读入数据”、“计算并输出”和“存盘”),然后画一个文本框(名称为Text1,MultiLine属性设置为True,ScrollBars 属性设置为2)(如图1-262所示)。程序运行后,如果单击“读入数据”按钮,则读入datain1.txt文件中的100个整数,放入一个数组中,数组的下界为1;如果单击“计算并输出”按钮,则把该数组中小于50的元素在文本框中显示出来,求出它们的和,并把所求得的和在窗体上显示出来;如果单击“存盘”按钮,则把所求得的和存入考生文件夹下的dataout.txt 文件中。
在考生文件夹下有一个工程文件sjt5.vbp,考生可以装入该文件。窗体文件中的ReadData 过程可以把datain1.txt 文件中的100个整数读入Arr数组中;而WriteData 过程可以把指定的整数值写到考生文件夹下指定的文件中(整数值通过计算求得,文件名为dataout.txt)。
注意:考生不得修改窗体文件中已经存在的程序。存盘时,工程文件名为sjt5.vbp,窗体文件名为sjt5.frm。
选项
答案
【操作步骤】 步骤1:打开考生文件下的本题工程文件sjt5.vbp,利用菜单设计器,如表2-132中的设置建立菜单项。 [*] 步骤2:在窗体Form1中画一个文本框,其相关属性及值见表2-133。 [*] 步骤3:在代码编辑窗口,分别编写三个菜单项的Click事件过程。 参考代码: Dim Sum As Integer Private Sub Read_Click() ReadData End Sub Private Sub Calc_Click() Dim S As String Sum = 0 For i = 1 To 100 If Arr(i) < 50 Then Sum = Sum + Arr(i) S = S & Str(Arr(i)) & " " End If Next i Text1.Text = S Print "Sum = "; Sum End Sub Private Sub Save_Click() WriteData "Dataout.txt", Sum End Sub 步骤4:按要求将文件保存至考生文件夹中。
解析
转载请注明原文地址:https://kaotiyun.com/show/BkFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下变量名中合法的是( )。
在窗体上画一个命令按钮(其Name属性为Command1),然后编写如下代码:PrivateSubCommand1_Click()Dimn()AsIntegerDima,bAsIntegera=Inpu
以下可以判断是否在文本框(名称为Text1)内按下了回车键的事件过程是
下列选项中属于面向对象设计方法主要特征的是( )。
一棵二叉树共有25个结点,其中5个是叶子结点,则度为1的结点数为( )。
以下关于控件的叙述中,正确的是
语句Dima(-3To4,3To6)AsInteger定义的数组的元素个数是( )。
设有下面程序代码:PrivateSubCommand1_Click()DimstrAsString,chAsStringstr="VisualBasicProgramming"ch="a"
以下说法中正确的是
下列循环中,可以正常结束的是( )。
随机试题
宋代由皇帝主持,为疏通君臣关系,提供决策信息而召开的决策会议称之为()
病史病人,男性,56岁,农民,小学文化。有高血压病史2年余,曾间断服用“尼群地平”、“卡托普利”等降压药,具体用法用量不详。因突起右侧肢体活动障碍、言语不能2天收入院。起病以来,自觉右侧上、下肢完全不能活动,不能讲话,进食少,饮水有呛咳现象;无头晕、呕吐,
目前国际上常用的测量血压方法所采用的仪器是
施工单位编制的单位工程施工组织设计是()的编制依据。
振兴工程公司承揽了幸福住宅小区建设项目。开工前,该项目的项目经理编制工作任务分工表,首先要对各项管理任务进行()。
在克拉克产业分类中,()属于第三产业。
设f(x)=x(x+1)…(x+n),求f(n)(x).
在OST网络层次模型的划分原则中,下列叙述不正确的是()。
AsyousatacrosstheThanksgivingtablebaskinginthewarmthoffamilyandthearomaofchestnutstuffing,mostlikelyyoudid
Millennials(千禧世代)aretakingtelecommuting(远距离工作)toawholenewlevel.Theyviewvirtualforeignworkexperienceashavingeq
最新回复
(
0
)