首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sj5.vbp,窗体上有一个文本框,名称为Textl,可以多行显示。还有三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读取数据”、“显示并保存奇数”和“显示并保存偶数”。“读取数据”按
在考生文件夹下有一个工程文件sj5.vbp,窗体上有一个文本框,名称为Textl,可以多行显示。还有三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读取数据”、“显示并保存奇数”和“显示并保存偶数”。“读取数据”按
admin
2009-03-26
77
问题
在考生文件夹下有一个工程文件sj5.vbp,窗体上有一个文本框,名称为Textl,可以多行显示。还有三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读取数据”、“显示并保存奇数”和“显示并保存偶数”。“读取数据”按钮的功能是把考生文件夹下的in5.dat文件中的50个整数读到数组中,并在Textl中显示出来;“显示并保存奇数”和“显示并保存偶数”按钮的功能是把50个数按要求保存到考生文件夹下的out51.dat和out52.dat文件中。单击“读取数据”
命令按钮后,程序运行时的窗体界面如图52—5所示。
注意:在窗体中已经给出了全部控件和部分程序,要求阅读程序并去掉程序中的注释符“’”,把程序中的“?”改为正确的内容,使其实现上述功能,但不能修改程序中的其他部分,也不能修改控件的属性。最后把修改后的文件按原文件名存盘。
选项
答案
根据题意,将一个Text控件和3个Command控件添加到窗体上,Text的名称为Textl,Text属性为空、MuhiLIne属性为True,ScrollBar属性为2,Command的名称分别为Commandl、Command2和Command3、Caption属性分别为“读取数据”“显示并保存奇数”和“显示并保存偶数”。双击Commandl命令按钮,编写如下代码: Dim a(50)As Integer Private Sub Commandl_Click() Dim i As Integer Dim str As String str="" Open"App.Path&\in5.dat"For Input As#l For i=1 To 50’利用For循环将数据读取到数组中 Input#1,a(i) str=str+CStr(a(i))+"" ’将数组放到字符串中 Next i Close#1 Textl.
Text
=str’将结果显示在Textl上 End Sub Private Sub Command2 Click() Dim i As Integer Dim str As String str="" For i=1 To 50 If a(i)Mod 2
=
1 Then str=str+CStr(a(i))+" End If Next i Textl.Text=str Open"App.Path&\out51.dat"For Output As#1 Print#1,str Close#1 End Sub Private Sub Command3_Click() Dim i As Integer Dim str As String str="" For i=1 To 50’利用For循环遍历数组 If a(i)Mod 2=
0
Then’如果是偶数 str=str+CStr(a(i))+"" ’则加入到字符串中 End If Next i Textl.Text=str’将得到的字符串显示在Textl上 Open"App.Path&\out52.dat"For Output As#1’打开文件准备写入 Print#1,str’将结果写入文件中 Close#1 End Sub 单击[*]按钮运行程序,并按要求保存。
解析
转载请注明原文地址:https://kaotiyun.com/show/sN1p777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
Java源文件中最多只能有一个【】类,其他类的个数不限。
一个applet标记中,必须出现的属性项有【】、WIDTH、HEIGHT。
下列关于Applet的叙述中,错误的是()。
数据结构中,与所使用的计算机无关的是数据的()
关于J2SDK的基本命令,下列叙述正确的是______。
算法的工作量大小和实现算法所需的存储单元多少分别称为算法的【】。
输入输出在计算机中有两个主要作用,是【】和提供数据处理结果。
若有以下定义inta[]={1,2,3,4,5,6,7};charc1=’b’,c2=’2’;则数值不为2的表达式是()。
算法的复杂度主要包括【】复杂度和空间复杂度。
关于变量的作用范围,下列说法错误的是()。
随机试题
企业在金融市场上发行股票和债券,从而取得资金的活动是()
2009年3月5日上午9时,第十一届全国人民代表大会第二次会议在人民大会堂开幕,国务院总理温家宝作政府工作报告,审查年度计划报告和预算报告。国际金融危机影响下,2009年中国经济走势如何百姓关注世界瞩目,政府工作报告提出2009年中国经济增长预期目标为()
Ilikethatsonof______.
2014年1月,北京居民李某的一件珍贵首饰在家中失窃后被窃贼带至甲国。同年2月,甲国居民陈某在当地珠宝市场购得该首饰。2015年1月,在获悉陈某将该首饰带回北京拍卖的消息后,李某在北京某法院提起原物返还之诉。关于该首饰所有权的法律适用,下列哪一选项是正确的
以下选项中不属于设备运杂费的是()。
福安公司为一家食品生产企业。2006年,福安公司拟扩大生产经营范围,投资于饮料行业。福安公司管理层在对当时国内饮料行业进行深入调研后发现:已有一批大中型饮料企业从事各类知名品牌的饮用水的生产和销售。有关情况如下:(1)水清公司生产饮用水的历史最长,其生产的
通常情况下,划分货币层次的依据是货币资产的()。
某超市采用促销的手段,凡购买价值200元以上的商品可以优惠20%,那么用320元钱在该超市最多可以买下价值()元的商品。
1919年,法国的“统一学校运动”主要的主张是()
关于χ的方程(m2-m-2)χ=m2+2m-8有无穷多解,则m=().
最新回复
(
0
)