首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下过程: 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
2018-07-11
50
问题
有如下过程:
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/oKGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设窗体的名称为Forml,标题为Win,则窗体的MouseDown事件过程的过程名是()。
对于循环队列,下列叙述中正确的是()。
在数据库设计中,将E-R图转换成关系数据模型的过程属于()。
设窗体上有一个文本框Textl和一个命令按钮Commandl,并有以下事件过程:PrivateSubCommandl_Click()DimSAsString,chAsStringS=“”
窗体上有名称为Commandl的命令按钮和名称为Textl的文本框PrivateSubCommandl—Click()Textl.Text=“程序设计”Text1.SetFocusEndSubPri
面向对象方法中,继承是指()。
在窗体上画一个通用对话框,程序运行中用ShowOpen方法显示“打开”对话框时,希望在该对话框的“文件类型”栏中只显示扩展名为DOC的文件,则在设计阶段应把通用对话框的Filter属性设置为
以下关于变量作用域的叙述中,错误的是
(1)在名称为Forml的窗体上画两个标签(名称分别为Labelll和Label2,标题分别为“姓名”和“年龄”)、两个文本框(名称分别为Textl和Text2,初始内容均为空)和一个命令按钮(名称为Commandl,标题为“显示”)。然后编写命令按钮的C
已知:x=-6y=39则表达式"y\x*Sgn(x)"的值为( )。
随机试题
A.附子理中丸B.参苓白术散C.温脾汤D.四神丸泄泻之肾阳虚衰证的代表方为
某公司申请股票上市交易,被核准。回答下列问题:公司应报送而没有报送临时报告,证券监督管理机构对公司有权采取下列哪些措施?()
行政监察制度可以分为()。
检验及鉴定大型设备是否合格,一般要经过试运转及()方能进行判断。
将城市分为棋盘形城市、放射形城市和不规则形城市,是按()划分的。
2016年,邮政企业和全国快递服务企业业务收入(不包括邮政储蓄银行直接营业收入)累计完成3203.3亿元,同比增长25.7%。12月,全行业业务收入完成317.5亿元,同比增长30.9%。2016年,邮政函件业务累计完成56.1乙件,同比下降11
某条道路安装了60盏功率相同的路灯,如将其中24盏的灯泡换为200瓦的节能灯泡。则所有路灯的耗电量将比之前节约20%。如将所有灯的灯泡换为150瓦的节能灯泡,则耗电量能比之前节约多少?()
温柔:内向:忧郁
设A是n阶反对称矩阵.若A可逆,则n必是偶数.
Whatdoesthemanmean?
最新回复
(
0
)