首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
有如下过程: 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
49
问题
有如下过程:
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全国计算机二级
相关试题推荐
(1)在名称为Forml的窗体上添加一个名称为Commamll的命令按钮数组,含1个命令按钮,它们的标题依次为“是”、“否”、“取消”,IndeX属性分别为0、1、2,每个按钮的高、宽均为,300、800。窗体的标题为“按钮窗口”。运行后的窗体如图所示。
下面程序的执行结果是()。PrivateSubCommandl_Click()a=0k=lDoWhilek
窗体上有一个名称为CDl的通用对话框控件和由四个命令按钮组成的控件数组Commandl,其下标从左到右分别为0、l、2、3,窗体外观如图所示。命令按钮的事件过程如F:PrivateSubCommandl_Click(IndexAsInteg
在VisualBasic中,表达式3*2\5Mod3的值是()。
在数据库设计中,将E-R图转换成关系数据模型的过程属于()。
若在窗体模块的声明部分声明了如下自定义类型和数组PrivateXyperecCodeAsInteger:CaptionAsStringEndTypeDimarr(5)Asrec则下面的输出语句中正确的是
在窗体上画一个名称为CommonDialog1的通用对话框,以下语句中正确的是
设变量MyName(字符串型),Age(整型)分别表示一个人的姓名和年龄,要设计一个逻辑表达式,当该人姓张,并且超过60岁,则表达式的值为True,下面正确的是
已知:x=-6y=39则表达式"y\x*Sgn(x)"的值为( )。
随机试题
磷酸戊糖途径的重要生理功能有
全科医疗与专科医疗的区别不包括
A.地西泮B.氯霉素C.阿司匹林D.卡比多巴E.苯妥英钠会引起凝血功能障碍的药物是
A.脾胃虚寒B.寒凝气滞C.饮食停滞D.肝胃郁热E.肝胃不和胃脘疼痛伴有灼热感,烦躁易怒,脉弦数,证属
某公司打算投资一个项目,预计该项目需固定资产投资800万元,为该项目计划借款融资800万元,年利率5%,每年末付当年利息。该项目可以持续5年。估计每年固定成本为(不含折旧)50万元,变动成本是每件150元。固定资产折旧采用直线法,折旧年限为5年,估计净残值
某公司正在开会讨论投产一种新产品,对以下收支发生争论,你认为不应列入该项目评价的现金流量有()。
义务教育是一种()。
××省人民政府办公厅关于大运河申报世界文化遗产的通报×政办发[2014]59号各市、县(市、区)人民政府,省各委办公厅局,省各直属单位:2014年6月22日,第38届世界遗产委员会正式将中国大运
Atpresentcompaniesandindustriesliketosponsorsportsevents.Tworeasonsareputforwardtoexplainthisphenomenon.Thef
Articlesinmagazinesandnewspapersandspecialreportsonradioandtelevision【B1】______theconcernofmanyAmericansaboutth
最新回复
(
0
)