首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open"c:\f1.txt"For
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open"c:\f1.txt"For
admin
2016-12-13
55
问题
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub Command1_Click()
Open"c:\f1.txt"For Input As#1
Open"c:\f2.txt"For Output As#2
Do While Not EOF(2)
Line Input#1,str1 Print#2,str1
Loop
Close Kill"c:\f1.txt"
End Sub
该程序运行时发生错误,应该进行的修改是
选项
A、打开f1.txt应该使用Output方式,打开f2.txt应该使用Input方式
B、Not EOF(2)应该改为Not EOF(1)
C、Line Input应改为Get
D、Close语句改为Close All
答案
B
解析
打开文件的基本格式为:Open FileName For Mode As#FileNumber,打开方式主要有Output、Append、Input、Random等几种。本题中打开了两个文件,其中1号文件用于读取,2号文件用于写入。当进行读取时循环条件应该为NotEOF(1)即还没有读取到文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/m6Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击命令按钮时,下列程序段的执行结果是()。PrivateSubCommandlClick()DimaAsInteger’bAsInteger,cAsIntegera=2:b=4:c=6
窗体上有一个名称为Commandl的命令按钮,其单击事件过程如下:PrivateSubCommandlClick()Dima,b(2,3)AsIntegera=Array(3,7,5,11,31,43,17,62,9,23,
以下关于通用对话框的叙述中,错误的是()。
公司中有多个部门和多名职员,每个职员只能属于一个部门,一个部门可以有多名职员。则实体部门和职员间的联系是()。
若要添加CommonDialog控件,则应从“工程”菜单中选定“部件”,在“部件”对话框的“控件”选项卡中选择______,将控件添加到工具箱中。
将E-R图转换到关系模式时,实体与联系都可以表示成()。
为了在运行时能显示窗体左上角的控制框(系统菜单),必须______。
模块级变量的声明关键字是Dim或______。
在关系数据库中,用来表示实体之间联系的是______。
随机试题
世界上大部分国家的政府在治理“失业”问题时,都倾向于采用哪种办法来解决?()
具有轻扬、向上向外特性的邪气是
简述无牙颌印模的要求。
某拟建企业设计生产某种产品,设计年产量为6000件,每件出厂价为50元,企业固定开支为26600元,产品可变成本为28元/件。产品销售税率预计为10%。请根据上述资料,回答下列问题:若要求企业年盈余达到5万元以上,则产量至少应达到()件。
对房地产开发项目,从取得房地产开发用地开始到建成后的物业管理等各个方面都进行策划和服务的工作,称为房地产()。
阅读下面材料,回答下列问题。2012年6月4日,中华全国总工会决定,追授杭州英雄司机吴斌全国五一劳动奖章,以表彰先进,弘扬正气。中央文明委发出《关于广泛开展向张丽莉、吴斌、高铁成同志学习活动的通知》。《通知》指出,学习张丽莉、吴斌、高铁成,就是要
下列不属于行政指导的是()。
下列对配置CiscoAironet1100无线接入点的描述中,错误的是()。
阅读程序:OptionBase1PrivateSubForm_Click()DimArr(3,3)AsIntegerFori=1To3Fori=1To3Ifj=iOrj=3-i+1ThenArr(i,j)=1Else
Thefitnessmovementthatbeganinthelate1960sandearly1970scenteredaroundaerobicexercise.Millionsofindividualsbeca
最新回复
(
0
)