首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮。其单击事件过程如下: Private Sub Command1_Click() Open"c:\f1.txt"For Input As #1:Open"c:\f2.txt"For Out
窗体上有一个名称为Command1的命令按钮。其单击事件过程如下: Private Sub Command1_Click() Open"c:\f1.txt"For Input As #1:Open"c:\f2.txt"For Out
admin
2017-04-25
32
问题
窗体上有一个名称为Command1的命令按钮。其单击事件过程如下:
Private Sub Command1_Click()
Open"c:\f1.txt"For Input As #1:Open"c:\f2.txt"For Output As #2
Do While Not EOF(1)
Line Input#1,str1:Print#2,str1
Loop
Close
End Sub
以下关于上述程序的叙述中,错误的是
选项
A、功能是将f2.txt中的内容复制到f1.txt中
B、f1.txt和f2.txt均是顺序文件
C、EOF函数可以判断是否已到文件的末尾
D、Close能够把打开的两个文件都关闭
答案
A
解析
VisualBasic程序中关于文件的操作,主要是先打开一个文件,然后对这个文件进行读或写的操作,操作完成后,关闭这个文件。打开文件的基本格式为:open FileName For Mode As #FileNumber。打开方式主要有Output、Append、Input、Random等几种方式。Output、Append、Input方式打开的文件进行的读写操作都是以顺序方式进行的,其中Output、Append打开的文件主要用来输出数据,与Print#、Write#等方法配合使用;以Input方式打开的文件主要用来读入数据,它与Input#、Line Input#语句配合使用。Line Input#语句从顺序文件中读取一个完整的行,并把它赋给一个字符串变量。本题中f1.txt和f2.txt分别使用Input和Output方式打开,所以都是顺序文件;EOF函数可以判断是否已到文件的末尾,一般用作循环条件;程序的功能是将f1.txt文件的内容复制到f2.txt中,最后的Close语句缺省文件号将会关闭所有的活动文件。
转载请注明原文地址:https://kaotiyun.com/show/phGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
从窗体form1生成到该窗体显示出来,最后发生的事件是______。
下列程序的功能是;将数据1,2,…,8写入顺序文件Num.txt中,请选择正确的程序段()。PrivateSubForm_Click()DimiAsIntegerOpen"Num.txt"ForOut
对长度为N的线性表进行顺序查找,在最坏情况下所需要的比较次数为______。
能够获得一个文本框中被选取文本的内容的属性是
要设置窗体为固定对话框,并包含控制莱单栏和标题栏,但没有最大化和最小化控钮,设置的操作是
文本框控件最多能处理______个字节。
假定程序中有以下语句:answer=MsgBox("String1",,"String2","String3",2)执行该语句后,将显示一个信息框,此时如果单击“确定”按钮,则answer的值为______。
在窗体上画一个文本框,然后编写如下事件过程:PrivateSubText1_KeyPress(KeyAsciiAsInteger)DimcharAsStringchar=Chr(KeyAscii)
设有以下循环结构;Do循环体LoopWhile<杂件>则以下叙述中错误的是______。
假定有一个菜单项,名为MenuItem,为了在运行时使该菜单项不可见,应使用的语句为()。
随机试题
我们在日常的商务活动中,在处理难接听的顾客电话时,下列做法中不妥的是
必须与蛋白质载体结合才具有免疫原性
多层螺旋CT与单层螺旋CT的主要区别是
腹部加压行静脉肾盂造影引起患者休克,最有效的急救措施是
肌电图或诱发电位主要是检查
关于专业施工分包人权利义务的说法,正确的有()。
有效期内某一时点借款人的可用贷款额度由()决定。
张家和李家都使用90米的篱笆围成了长方形的菜园,已知李家的长方形菜园的长边比张家短5米,但是菜园面积却比张家大50平方米,则李家的长方形菜园面积为:
如果2013—2015年该市工业废水排放量与2010年—2012年保持相同的年平均增长速度,则2015年该市工业废水排放量预计达到()。
基准利率
最新回复
(
0
)