首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
在考生文件夹下有一个工程文件sj5.vbp,窗体上有一个文本框,名称为Textl,可以多行显示。还有三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读取数据”、“显示并保存奇数”和“显示并保存偶数”。“读取数据”按
在考生文件夹下有一个工程文件sj5.vbp,窗体上有一个文本框,名称为Textl,可以多行显示。还有三个命令按钮,名称分别为Commandl、Command2和Command3,标题分别为“读取数据”、“显示并保存奇数”和“显示并保存偶数”。“读取数据”按
admin
2009-03-26
32
问题
在考生文件夹下有一个工程文件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全国计算机二级
相关试题推荐
下列属于Applet运行过程中的是()。
对于建立良好的程序设计风格,下面有关数据说明描述错误的是()。
下列程序创建了一个线程并运行,请填空,使程序完整。publicclassThreadTest{publicstaticvoidmain(Stringargs[]){Helloh=newHello();
将E-R图转换到关系模式时,实体与联系都可以表示成
如果对一个关系实施了一种关系运算后得到了一个新的关系,而且新的关系中属性个数少于原来关系中属性个数,这说明所实施的运算关系是()
下面叙述正确的是()。
关于对象串行化,下列叙述正确的是______。
关于文件名的处理中,测试当前文件是否目录用【】函数。
关于变量的作用范围,下列说法错误的是()。
int类型的取值范围为
随机试题
简述PHP的功能特点。
Didyoueverhavesomeone’snameonthetipofyourtongueandyetyouwereunabletorecallit?【C1】______thishappensagain,do
脉压增大,伴股动脉枪击音P2减低
某种房地产的供给,是指房地产开发商和拥有者(卖者)在一定价格上所愿意且能够出售的该种房地产的数量。形成供给有两个条件:一是开发商或拥有者愿意供给,二是开发商或拥有者有能力供给。如果开发商或拥有者对某种房地产只有开发或出售的愿望,而没有开发或出售的能力,则不
下列关于建设项目建设期利息估算的表述中,正确的有()。
承销商分销记账式国债采用场内挂牌分销的,投资者在买入债券时,可免交佣金,但是交易所可以向代理机构收取买卖国债的经手费用。()
下列银行业从业人员的做法,符合职业操守有关“信息披露”规定的是()。
干涉变量()。
下面是某英语教师对学生作业的批改案例:HiSuzanne,Firstofall,welcometoChina.Infact,manystudentshavethesameproblemlikeyou.Asa
科学发展观的核心是()。
最新回复
(
0
)