首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
去掉程序中的注释符“’”,把程序中的“?”改为正确的内容,使其实现下述功能,但不能修改程序中的其他部分。在窗体上有3个命令按钮,名称分别为Read、Cal和save,标题分别为“读入数据”、“判断计算”和“保存”,还有两个文本框(名称分别为Textl和Te
去掉程序中的注释符“’”,把程序中的“?”改为正确的内容,使其实现下述功能,但不能修改程序中的其他部分。在窗体上有3个命令按钮,名称分别为Read、Cal和save,标题分别为“读入数据”、“判断计算”和“保存”,还有两个文本框(名称分别为Textl和Te
admin
2009-03-26
1.8K+
问题
去掉程序中的注释符“’”,把程序中的“?”改为正确的内容,使其实现下述功能,但不能修改程序中的其他部分。在窗体上有3个命令按钮,名称分别为Read、Cal和save,标题分别为“读入数据”、“判断计算”和“保存”,还有两个文本框(名称分别为Textl和Text2,其中Textl的MultiLine属性设置为True,ScrollBars属性设置为2),程序运行界面如图31—5所示。
程序运行后,如果单击“读人数据”按钮,则读入sjin.txt文件中的50个整数,放人一个数组中,数组的下界为l;如果单击“判断计算”按钮,则把该数组中大于400且是奇数的元素在文本框中显示出来,并求出它们的和,并把所求得的和在Text2中显示出来;如果单击“保存”按钮,则把所求得的和存入考生文件夹下的sjout.txt文件中。在考生文件夹下有一个工程文件sj5.vbp,输出文件名为sjout.txt。
注意:考生不得修改窗体文件中已经存在的程序。存盘时,工程文件名仍为sj5.vbp,窗体文件名仍为sj5.frm。
选项
答案
根据题意,将两个Text控件和3个Command控件添加到窗体上,Text的名称分别为Textl和Text2、Text属性全为空,其中Textl的MultiLine属性为True、ScrollBar属性为2、Command的名称分别为Commandl、Command2和Command3,Caption属性分别为“读人数据”、“判断计算”和“保存”。双击Commandl命令按钮,编写如下代码: Dim a(50)As Integer Dim total As Long Private Sub Commandl_Click() Dim str As String Dim i As Integer str="" Open"App.Pathl&\sjin.txt"For
Input As
#1 ’打开文件准备读入 For i=1 To 50 ’利用For循环将50个数读人到数组中 Input#1,a(i) str=str+CStr(a(i))+vbCrLf’以字符串形式保存 Next i Close#1 Textl.Text=str’在Textl中显示数组 End Sub Private Sub Command2_Click() Dim i As Integer Dim str As String str="" total=0 For i=1 To 50’利用For循环遍历数组
If a(i)>400 And a(i)Mod 2=1
Then’判断是否大于400且是奇数 total=
total+a(i)
’如果是则求和 str=str+CStr(a(i))+vbCrLf’并放入输出字符串中 End If Next i Textl.Text=str’在Textl中显示符合条件的数 Text2.
Text
=total’在Text2中显示和 End Sub Private Sub Command3 Click() Open"App.Pathg&\sjout.txt"For
Output As#2
’打开文件准备写入 Print#2,total’将求得的和写入文件中 Close#2 End Sub 单击[*] 按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/vV1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
当检索一个压缩文件时,首先要建立压缩文件输人流对象,该对象()
数据结构中,与所使用的计算机无关的是数据的()
在编写JavaApplication程序时,若需要使用到标准输入输出语句,则必须在程序的开头写上______语句。()
下列注释使用原则的叙述,正确的是()
【】是一个特殊的方法,是为对象初始化操作编写的方法,用它来定义对象的初始状态。
下列常见的系统定义中的异常中,______是数组越界异常。
下列不属于更新数据库操作步骤的是()。
设有如下关系表:则下列操作中正确的是()。
关于文件名的处理中,测试当前文件是否目录用【】函数。
关于变量的作用范围,下列说法错误的是()。
随机试题
A.半夏B.天南星C.白附子D.白芥子善祛“皮里膜外之痰”的药物是
首先应考虑的诊断是如无有效治疗,本病最后结局可能为
下列除了哪类人,均应该追究刑事责任
某污水处理工程采用罗茨鼓风机曝气,为降低罗茨风机及其风管辐射至厂界的噪声,可以采用的方法有()。
某市财政局在2002年4月《会计法》执法检查中,发现某小型企业为节省开支,只任用了两名会计,其中已取得会计师职称,并持有会计从业资格证书的王某被单位负责人指定为会计主管人员,负责登记总账,编制财务会计报告和稽核工作;另一名尚未取得会计从业资格证书的张某被单
下面交易中,损益平衡点等于执行价格加权利金的有()。Ⅰ.买入看涨期权Ⅱ.卖出看涨期权Ⅲ.买入看跌期权Ⅳ.卖出看跌期权
下列不属于替代债务期限决定因素的是()。
一段时间以来,国产洗发液在国内市场的占有率逐渐减小。研究发现,国外公司的产品广告比国内的广告更吸引入。因此,国产洗发液生产商须要加大广告投入,以增加市场占有率。以下哪项如果为真,将严重地弱化上述的论证?()
【2011华南理工大学名词解释第4题】欧式期权
甲将电脑借给乙使用,一周后乙觉得甲的电脑用起来很顺手便提出购买,甲表示同意并收下乙支付的价款,该电脑的交付方式属于()
最新回复
(
0
)