首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下过程: Sub proc() Dim ch As String Open "file1.txt" For Input As #1 Open "file1_bak.txt" For Output As #2 Do Whi
有如下过程: Sub proc() Dim ch As String Open "file1.txt" For Input As #1 Open "file1_bak.txt" For Output As #2 Do Whi
admin
2015-06-30
10
问题
有如下过程:
Sub proc()
Dim ch As String
Open "file1.txt" For Input As #1
Open "file1_bak.txt" For Output As #2
Do While Not EOF(1)
ch = Input$(1, #1)
Print #2, ch;
Loop
Close #1, #2
End Sub
这一过程的功能是
选项
A、读入文件file1.txt的内容在窗体上显示
B、读入文件file1_bak.txt的内容在窗体上显示
C、把文件file1_bak.txt复制为file1.txt文件
D、把文件file1.txt复制为file1_bak.txt文件
答案
D
解析
Open语句兼有打开文件和建立文件两种功能。Output和Input分别指定文件顺序输出方式和顺序输入方式。Open "file1.txt" For Input As #1意思是以顺序输入方式打开已经存在的file1.txt文件; Open "file1_bak.txt" For Output As #2的意思是以顺序输出方式打开数据文件file1_bak.txt,新写入的数据将覆盖原来的记录,如果文件不存在,则建立一个文件。Input$(n, #文件号)该函数返回从指定文件中读出的n个字符的字符串(即它可以再数据文件中读取指定数目的字符),ch = Input$(1, #1)语句是从文件号为1的文件中读出1个字符,并将其赋值给ch。Print#文件号,实现的功能是把数据写入文件中,Print #2,ch是把ch输入到文件号为2的文件中。两个语句实际上就是把文件号为1的中的1个字符复制到文件2中。EOF函数用来返回测试文件的结束状态,对于顺序文件来说,如果已达到文件尾,则函数返回值为True,否则返回值为False。利用EOF函数,可以避免在文件输入时出现"输入超出文件尾"的错误。EOF(n)的含义是已到达文件尾,Not EOF(n)的含义是没有到达n所对应文件的末尾。 Do While Not EOF(1)保证循环执行,直到已到达文件号为1的文件尾。利用Do While Not EOF(1),循环执行以上Input和Print语句,则是把文件号为1的文件内容复制到文件号为2的文件中,即把文件file1.txt复制为file1_bak.txt文件,故D选项正确,C选项错误。程序中并没有窗体上显示的程序语句,故A项和B项错误。故选择D项。
转载请注明原文地址:https://kaotiyun.com/show/FgQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在窗体上画一个名称为Labell、标题为“ViSBalBasic考试”的标签,两个名称分别为Command1和Command2、标题分别为“开始”和“停止”的命令按钮,然后画一个名称为Timer1的计时器控件,并把其Interval属性设置为500,如图
在窗体上画一个名称为Commandl的命令按钮,然后编写如下代码:OptionBase1PrirateSubCommand1Click()d=0c=10x=Array(10,
设有如下通用过程:PublicSubFun(a(),ByValxAsInteger)Fori=1To5x=x+a(i)NextEndSub在窗体上画一
阅读下面的程序段:Fori=1To3Forj=iTo3Fork=1To3a=a+iNextkNextjNexti执行上面的
下列数据结构中,能用二分法进行查找的是
按照逻辑结构分类,数据结构可分为线性结构和非线性结构,队列属于______。
某人在窗体上画了一个名称为Timer1的计时器和一个名称为Label1的标签,计时器的属性设置为Enabled=True,Interval=0,并编程如下。希望在程序运行时,可以每2秒在标签上显示一次系统当前时间。PrivateSubTimer
表达式Str(Len("123"))+Str(77)的值是()。
下列正确的VisualBasic注释语句是
随机试题
患者,女,30岁。半小时前家人发现其神志不清。既往无特殊病史。检查发现呕吐物有大蒜昧,双侧瞳孔明显缩小。应首先考虑的是
A.知母B.甘草C.川贝母D.黄芪E.党参类圆锥形或近心形,表面类白色,气微,味微苦()。
根据《国务院关于改革药品医疗器械审评审批制度的意见》(国发[2015]44号)中,关于仿制药的概念是()。
某公司2015年3月份新增一项固定资产,4月份安装调试完成,5月份投入使用。该项固定资产应从当年()月份开始计提折旧。
在索赔事件发生后28天内,承包商必须向监理工程师提出书面的( ),否则就丧失了索赔权利。
重点查验消防产品符合国家市场准人规定的相关合法性文件,以及出厂检验合格证明文件的是消防产品()。
狐狸对于()相当于()对于忠诚
唐代,中书省中中书舍人凡六员,在制作诏令过程中,可互相商量,并允许“各执所见,杂署其名”,谓之()。
A、Yes,it’sbeautiful.B、No.C、Thankyou.C对于赞扬应该表示感谢,选项[C]Thankyou.符合交际习惯。
ThefollowingtwoexcerptsareaboutIceBucketChallenge,anactivityinitiatedtoraisemoneyandawarenessforthediseaseAL
最新回复
(
0
)