首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open "c:\f1.tx
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open "c:\f1.tx
admin
2019-03-14
20
问题
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub Command1_Click()
Open "c:\f1.txt" For Input As #1
Open "c:\f2.txt" For Output As #2
Do While Not EOF(2)
Line Input #1, str1
Print #2, str1
Loop
Close
Kill "c:\f1.txt"
End Sub
该程序运行时发生错误,应该进行的修改是
选项
A、打开f1.txt应该使用Output 方式,打开f2.txt 应该使用Input 方式
B、Not EOF(2)应该改为Not EOF(1)
C、Line Input应改为Get
D、Close语句改为Close All
答案
B
解析
Open打开文件时,可以用三种模式,即OutPut:打开一个文件,将对该文件进行写操作;Input:打开一个文件,将对该文件进行读操作;Append:打开一个文件,将在该文件末尾追加记录。
Do While循环应该判断1#文件的结尾,即Do While Not EOF(1),不是结尾的话把内容写到2#文件中。
Line Input语句为从已打开的顺序文件中读出一行并将它分配给 String变量。
Close语句后面有文件号,就关闭这个文件,否则就关闭所有打开的文件。此题中应该关闭所有的文件。选B。
转载请注明原文地址:https://kaotiyun.com/show/LdFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下面哪个属性肯定不是框架控件的属性( )。
有如下程序:PrivateSubForm_Click() DimiAsInteger,nAsInteger Fori=1To20 i=i+4 n=n+i Ifi>10ThenExitFor
编写如下程序:PrivateSubCommand1_Click()DimnAsLong,sAsStringn=InputBox("输入一个数")DoWhilen0Printn\10
现有如下程序:PrivateSubCommand1_Click() s=0 Fori=1To5 s=s+f(5+i) Next PrintsEndSubPublicFunctionf(xAsInteger
窗体上有一个名称为Command1的命令按钮,一个名称为List1的列表框。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()Open"c:\f1.txt"ForInputAs#1DoWh
若变量a未事先定义而直接使用(例如:a=0),则变量a的类型是( )。
下列关于顺序文件的描述中,正确的是
在深度为7的满二叉树中,叶子结点的个数为
设有关键码序列(Q,G,M,Z,A,N,B,P,X,H,Y,S,T,L,K,E),采用堆排序法进行排序,经过初始建堆后关键码值B在序列中的序号是()。
下列数据结构中,能用二分法进行查找的是
随机试题
1982年获得诺贝尔文学奖的哥伦比亚作家是()
穿心莲药材来源于
实验组间互为对照是实验和对照在同一受试对象身上进行的对照是
A.紫杉醇B.多西他赛C.他莫昔芬D.依托泊苷E.长春瑞滨含有糖结构的半合成抗肿瘤药物是
用于肝肾阴虚的耳鸣耳聋,头晕目眩的五官科非处方药是()
低压架空线路上每隔()距离应安装过电压保护器件。
关于施工合作体,下列说法中正确的是()。
如图,在棱长为2的正方体ABCD—A1B1C1D1中,E为BC的中点,点P在线段D1E上,点P到直线CC1的距离的最小值为().
15
UnderstandingTypesofPoemsⅠ.EpicpoemsA.Definition:—anarrativeconcentratingon【T1】________andeventsthata
最新回复
(
0
)