首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下过程: 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
36
问题
有如下过程:
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全国计算机二级
相关试题推荐
将C盘根目录下的图形文件moon.jpg装入图片框Picture1的语句是______。
设有如下程序:PrivateSubCommand1_Click()DimCAsInteger,dAsIntegerc=4d=InputBox(“请输入一个整数”)DoWhi
表达式Str(Len("123"))+Str(77)的值是()。
关于结构化程序设计原则和方法的描述错误的是()。
假设线性表的长度为n,则在最坏情况下,冒泡排序需要的比较次数为【】。
为清除PietureBox控件中的图形,下列方法正确的是()
假定建立了一个工程,该工程包括两个窗体,其名称(Name属性)分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示窗体Form2,请将下面的程序补充
表达式Fix(-68)+Int(-02)的值为【】。
下列表达式有错误,正确的写法应该是【】。[(a+B)+c]/80-5÷(d+e)
随机试题
试机是为了试验设备运转的灵活性,振动,工作温升,噪声、转速、功率等性能是否符合要求。()
设有二进制数X=1101110,若采用8位二进制数表示,则[X]补()
吉兰一巴雷综合征患者低效型呼吸的主要原因是
A.番泻叶B.山豆根C.川芎D.关木通E.牛黄解毒丸大剂量使用会抑制心脏、扩张血管、降低血压的是()
配电线路应装设短路保护、过载保护和接地故障保护。保护电器一般装设在()。
金属储罐的浮顶及内浮顶升降试验合格标准有()。
火力发电厂应采用防烟、排烟方式,合理选用排烟风机,其中计算机室、控制室、电子设备间,应设排烟设施,机械排烟系统的排烟量可按房间换气次数每小时不小于()次计算。
在考生文件夹下有一个数据库文件“samp1.accdb”,其中存在设计好的表对象“tStud”。请按照以下要求,完成对表的修改。将冻结的“姓名”字段解冻。
Couldthebadolddaysofeconomicdeclinebeabouttoreturn?SinceOPECagreedtosupply-cutsinMarch,thepriceofcrudeoil
ThewetvolcanicashthatcoveredaMayavillageinCentralAmericainaboutAD595coatedandpreservedeverydayobjectsbeans,
最新回复
(
0
)