首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生目录下有工程文件sjt5.vbp和文本文件in5.txt,in5.眦中有不超过100个4位正整数。窗体上有2个命令按钮,其功能是:单击“读入数据”按钮,可以读入in5.txt文件中的所有数,并显示在文本框中。单击“计算并保存”按钮,能够把满足下述条件
在考生目录下有工程文件sjt5.vbp和文本文件in5.txt,in5.眦中有不超过100个4位正整数。窗体上有2个命令按钮,其功能是:单击“读入数据”按钮,可以读入in5.txt文件中的所有数,并显示在文本框中。单击“计算并保存”按钮,能够把满足下述条件
admin
2018-03-20
20
问题
在考生目录下有工程文件sjt5.vbp和文本文件in5.txt,in5.眦中有不超过100个4位正整数。窗体上有2个命令按钮,其功能是:单击“读入数据”按钮,可以读入in5.txt文件中的所有数,并显示在文本框中。单击“计算并保存”按钮,能够把满足下述条件的整数的个数,以及这些数的累加和存入out5.txt文件。这些数需满足的条件是:数中各位数字累加后能够被5整除(例如:5235各位数字累加和是15,能够被5整除,所以是满足条件的数)。
要求:
1)把“读入数据”按钮的Click事件过程中的?改为正确的内容;
2)为“计算并保存”按钮的Click事件过程编写代码。(事件过程的最后一行用于存盘,已经给出,考生不得修改,否则无成绩!)。
注意:不能修改程序的其他部分和控件属性。最后把修改后的文件按原文件名存盘。
选项
答案
【操作步骤】 步骤1:打开本题项目工程。 步骤2:打开代码编辑窗口,去掉程序中的注释符“’”,将问号改为正确的内容,并在“考生编写的代码”区域填入相应的代码以实现题目的功能。 参考答案 Option Base 1 Dim a(100)As Integer,num As Integer Private Sub Command1_Click() Dim k As Integer k=1 Open App.Path&"\in5.txt"For Input As #1 Do While Not EOF(1) Input #1,k-1 k=k+1 Loop Close #1 num=k-1 For k=1 To num Text1=Text1 & a(k)& " " Next k End Sub Private Sub Command2_Click() Dim sum As Long,n As Integer,s As Integer Call SaveFile(sum,n) ’此行用于存盘,考生不得修改,否则无成绩! End Sub Private Sub SaveFile(sum As Long,n As Integer) Open App.Path &"\out5.txt"For Output As#1 Print #1,n,sum Close #1 End Sub 步骤3:调试并运行程序,关闭程序后按题目要求存盘。
解析
转载请注明原文地址:https://kaotiyun.com/show/s0Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
滚动条的最小值属性是_________.最大值属性是__________。
结构化程序设计的3种基本结构是()。
关系数据库管理系统能实现的专门关系运算包括______。
记时器控件能有规律的以一定时间间隔触发【】事件,并执行该事件过程中的程序代码。
资源文件的扩展名是
当用_____________方式打开文件时,如果对文件进行写操作,则写入的数据附加到原文件的后面。
某系统总体结构图如下图所示:该系统总体结构图的深度是
下列叙述中正确的是
(1)请根据以下各小题的要求设计VisualBasic应用程序(包括界面和代码)。在名称为Forml、标题为”标签”的窗体上画一个名称为Labell的标签,并设置适当属性以满足以下要求:①标签的内容为”计算机等级考试”;②标签可根据显示内容
某二叉树共有7个结点,其中叶子结点只有1个,则该二叉树的深度为(假设根结点在第1层)()。
随机试题
宫颈炎
银杏鸡丁中的银杏具有_______功效。
适合用作Cache的存储器芯片是________。
以下哪项不符合扩张型心肌病超声表现
如上哪项的骨髓象有核细胞显著增多,正常幼红细胞和巨核细胞减少如上哪项的骨髓象示增生明显活跃,以粒细胞为主,粒红比例为(10~15):1
风湿性二尖瓣狭窄和关闭不全的并发症正确的是
根据我国政府对WTO的承诺,加入后3年内,外资证券公司设立合营证券公司可以(不通过中方中介)从事的业务包括()。I.A股的承销Ⅱ.基金的承销和交易Ⅲ.发起设立基金Ⅳ.B股和H股、政府和公司债券的承销和交易
I____Yangzhousince1wasborn.
社会平等和经济平等密切相关,互为因果。显著并在增大的收入差距并未证明有助于富有活力的经济成效和发展的强大势头。事实上看起来更可能是强烈地阻碍了公众对于发展的参与。因此( )。
请从所给的四个选项中,选择最合适的一个填入问号处,使之呈现一定的规律性:
最新回复
(
0
)