首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在窗体上建立三个菜单项(名称分别为Read、Calc和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后添加一个文本框(名称为Textl,MultiLine属性设置为True,ScroUBars属性设置为2)(如图所示)。程序运行后,如果执
在窗体上建立三个菜单项(名称分别为Read、Calc和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后添加一个文本框(名称为Textl,MultiLine属性设置为True,ScroUBars属性设置为2)(如图所示)。程序运行后,如果执
admin
2015-06-30
104
问题
在窗体上建立三个菜单项(名称分别为Read、Calc和Save,标题分别为“读人数据”、“计算并输出”和“存盘”),然后添加一个文本框(名称为Textl,MultiLine属性设置为True,ScroUBars属性设置为2)(如图所示)。程序运行后,如果执行“读人数据”命令,则读人datainl.txt文件中的100个整数,将其放入一个数组中,数组的下界为1;如果单击“计算并输出”命令按钮,则把该数组中可以被3整除的元素显示在文本框中,求出它们的和,并把所求得的和显示在窗体上;如果单击“存盘”命令,则将所求得的和存入考生文件夹下的dataout.txt文件中。
在考生文件夹下有一个工程文件sjt5.vbp。窗体文件中的ReadData过程可以把datainl.txt文件中的100个整数读入Arr数组中;而WriteData过程可以把指定的整数值写到考生文件夹下指定的文件中(整数值通过计算求得,文件名为dataout.txt)。
注意:考生不得修改窗体文件中已经存在的程序。存盘时,工程文件名保存为sjt5.vbp,窗体文件名保存为sjt5.frm。
选项
答案
【操作步骤】 步骤1:打开本题工程文件,利用菜单编辑器,按表3.77中的设置建立菜单项,然后在窗体Form1中添加一个文本框,其相关属性及其值见表3.97和表3.98 [*] 步骤2:分析并编写程序代码。 程序提供代码 Option Base 1 Dim sum As Integer 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) Mod 3) = 0 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://kaotiyun.com/show/LNQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在程序代码中将图片文件mypic.jpg装入图片框Picture1的语句是______。
当一个工程含有多个窗体时,其中的启动窗体是______。
假定窗体上有一个标签,名为Labe11,为了使该标签透明并且没有边框,则正确的属性设置为______。
数据的四种基本逻辑结构是指______。
下面程序运行后,窗体中显示【】。PrivateSubCommand1_Click)()aS="*":b$="$"Fork=1To3x$
为了清除列表框中的所有内容,应使用的方法是______。
以下程序段中Do...Loop循环执行的次数为【】。程序执行完毕后,n的值为【】。PrivateSubCommand1_Click()n=5DoIfnMod2=0Then
可以用InputBox函数产生“输入对话框”。若执行下列语句时,st$=InputBox(“请输入字符串”,“字符串对话框”,“字符串”)当用户输入完毕,按OK按钮后,st$变量的内容是______。
在窗体上画一个列表框、一个命令按钮和一个标签。程序运行后,在列表框中选择一个项目,然后单击命令按钮,即可将所选择的项目删除,并在标签中显示列表框当前的项目数,下面是实现上述功能的程序,请填空。PrivateSubForm_Load()
在软件生命周期中,能准确地确定软件系统必须做什么和必须具备哪些功能的阶段是______。
随机试题
下列句子中,标点符号使用符合规范的是()。
腭裂手术时在腭部黏骨膜下注射含肾上腺素的麻药或生理盐水的主要目的是
A、颅内动脉瘤B、后颅凹肿瘤C、颞部巨大硬脑膜外血肿D、脑挫裂伤E、脑膜膨出易造成小脑幕裂孔疝的疾病是
下列关于甲、乙、丙之间关系的何种表述是正确的?下列关于甲、丁之间买卖合同的何种表述是正确的?
关于缓刑的适用,下列哪些选项是错误的?(2017年卷二56题)
在城镇交通繁华路段施工盖梁时,宜采用(),以减少占路时间。
纳税人有()情况之一的,税务机关有权核定其应纳税额。
以下关于目标管理法的说法正确的有()。
2015年3月24日,中共中央政治局审议通过广东、天津、福建自由贸易试验区总体方案,进一步深化上海自由贸易试验区改革试验方案,其中主要对台湾地区和东盟贸易的自贸区是()
某人从光线明亮的地方进入暗室,开始什么也看不见,但过一会儿慢慢就能看见一些物体了。这种变化是由学习导致的。
最新回复
(
0
)