首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后添加一个文本框(名称为Text1,可显示多行,ScrollBars属性设置为2)(如图所示)。程序运行后,如果执行“读人数据”命令,则读入
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后添加一个文本框(名称为Text1,可显示多行,ScrollBars属性设置为2)(如图所示)。程序运行后,如果执行“读人数据”命令,则读入
admin
2015-06-30
22
问题
在窗体上建立三个菜单(名称分别为Read、Calc和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后添加一个文本框(名称为Text1,可显示多行,ScrollBars属性设置为2)(如图所示)。程序运行后,如果执行“读人数据”命令,则读入datainl.txt文件中的100个整数,放入一个数组中,数组的下界为1;如果单击“计算并输出”按钮,则把该数组中小于50的元素显示在文本框中,求出它们的和,并把所求得的和显示在窗体上;如果单击“存盘”按钮,则将所求得的和存入考生文件夹下的dataout.txt文件中。
在考生文件夹下有一个工程文件sjt5.vbp。窗体文件中的ReadData过程可以把datainl.txt文件中的100个整数读入Arr数组中;而WriteData过程可以把指定的整数值写到考生文件夹下指定的文件中(整数值通过计算求得,文件名为dataout.txt)。
注意:考生不得修改窗体文件中已经存在的程序。存盘时,工程文件名仍然保存为sjt5.vbp,窗体文件名仍然保存为sit5.frm。
选项
答案
【操作步骤】 步骤1:打开本题工程文件,利用菜单设计器,按表3.108中的设置建立菜单项,在窗体Form1中绘制一个文本框,其相关属性值见表3.108和表3.109。 [*] 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Dim Arr(100) As Integer Sub ReadData() Open App.Path & "\" & "datain1.txt" For Input As #1 For i =1 To 100 Input #1, Arr(i) Next i Close #1 End Sub Sub WriteData(Filename As String, Num As Integer) Open App.Path & "\" & Filename For Output As #1 Print #1, Num Close #1 End Sub 程序结束 参考答案 Private Sub Calc_Click() Text1.Text = "" For i = 1 To 100 If Arr(i) < 50 Then Text1.Text = Text1.Text & Arr(i) & Space(5) sum = sum + Arr(i) End If Next i Print sum End Sub Private Sub Read_Click() ReadData End Sub Private Sub Save_Click() WriteData "dataout.txt", sum End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://jikaoti.com/ti/RW60FFFM
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列对于软件测试的描述正确的是()。
在面向对象方法中,类的实例称为______。
排序是计算机程序设计中的一种重要操作,常见的排序方法有插入排序、【】和选择排序等。
一些重要的程序语言(如C语言和Pascal语言)允许过程的递归调用。而实现递归调用中的存储分配通常用()
结构化方式由结构化分析、结构化设计和【】构成,它是一种面向数据流的开发方法。
若二叉树中度为2的结点有15个,度为1的结点有10个,则有【】个叶结点。
Datetime是Data类型的变量,以下赋值语句中错误的是:______。
若二叉树中度为2的结点有15个,度为1的结点有10个,则有______个叶结点。
在程序设计阶段应该采取【】和逐步求精的方法,把一个模块的功能逐步分解,细化为一系列具体的步骤,进而用某种程序设计语言写成程序。
设有整型变量s,取值范围为0~100,表示学生的成绩。有如下程序段:IfS>=90ThenLevel=“A”ElseIfs>=75ThellLevel=“B”ElseⅡs>=60ThenLevel=“C”ElseLevel=“D
随机试题
男性5天早产儿,因不吃奶、哭声弱、周身凉2天入院。体检:体温不升,呼吸不规则,面色发绀,皮肤冷并呈紫红色,双下肢、臀部、下腹部及面颊部皮肤发硬,压之微凹陷,双肺可闻及少量湿啰音,最可能的诊断是
男性绝育手术的最佳方式是结扎输精管。输精管从附睾管开始通过阴囊进入腹股沟管,最后进入腹腔。下列哪个部位最适宜结扎输精管
A.萘醌色素类B.地黄多糖RPS-bC.环烯醚萜苷类D.天花粉蛋白E.挥发油
A.影响妄想B.关系妄想C.钟情妄想D.嫉妒妄想E.被害妄想病人认为同事之间聊天是在议论他,别人咳嗽是在唾骂他,这种表现属于()。
室外停车场比例:见图1—2—1。单位:m。设计条件:某文化馆(建筑耐火等级二级)拟建机动车停车场,场地平面如图1—2—1所示。停车场布置要求如下:1.在用地范围内尽可能多布置停车位(含4个残疾人停车位),停
下列()是中国银行的信用卡。
《旅行社条例》规定,有下列()情形之一的,由旅游行政管理部门或者工商行政管理部门责令改正,没收违法所得,违法所得10万元以上的,并处违法所得1倍以上5倍以下的罚款;违法所得不足10万元或者没有违法所得的,并处lO万元以上50万元以下的罚款。
导游讲解是导游其他工作的最终落脚点,也是旅游者衡量导游服务水平的重要标尺。()
设f(x)在区间[a,b]上二阶可导且f"(x)≥0.证明:
要从自定义对话框Form2中退出,可以在该对话框的“退出”按钮Click事件过程中使用()语句。
最新回复
(
0
)