首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为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
2018-12-20
55
问题
窗体上有一个名称为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/XVFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有以下程序:PrivateSubForm_Click() x=50 Fori=1To4 y=InputBox("请输入一个整数") y=Val(y) IfyMod5=0Then a=a+y
以下关于窗体的叙述中,错误的是( )。
以下叙述中错误的是( )。
窗体上有一个名称为Command1的命令按钮,其单击事件过程及相关的函数过程如下:PrivateSubCommand1_Click()DimiAsIntegerFori=1To500Ifp(i)
程序运行时,拖动滚动条上的滚动框,则所触发的事件是
设有如下声明语句OptionBase1Dimarr(2,-1To5)AsInteger则数组arr中数组元素的个数是
下列关于菜单项的描述中,错误的是
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
窗体上有一个名称为Text1的文本框,一个名称为Command1的命令按钮。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()Dimx1AsInteger,x2AsInteger,x3AsIn
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:PrivateSubCommand1_Click()DimsAsDoubles=0:i=1DoWhilei<6s
随机试题
教师必须接受专门的职业训练,教师专业训练的内容主要包括专业意识、专业态度、专业知识、专业品质和()
生殖器疣的病原体非淋菌性尿道炎的病原体
混凝土结构物的缺陷和损伤的形成原因有()。
背景材料:某城市学校一教学楼由5层主楼和3层辅楼组成。某施工单位(乙方)与某建设单位(甲方)签订了该教学楼的施工合同,合同工期为38周。合同约定,工期每提前(或拖后)1天奖励(或罚款)2500元。乙方提交了拟定的施工网络进度计划(网络进度计划图如
宏观绩效衡量主要是考察整个宏观经济对基金业绩的影响。( )
商业银行资产管理理论包括()。
从长期来看,经济增长的最主要推动力是()。
以下选项中,不是建立字典的方式是
有以下程序#include<stdio.h>voidfun(int*a,int*b){int*c;c=a:a=b;b=c;}main(){intx=3,y=5,*p=&x,*q=&y;fun(p,q);printf("%d,%d,",*p
ValentineHistory,TraditionsandCustomsEveryFebruary,acrossthecountry,candy,flowers,andgiftsareexchangedbetwee
最新回复
(
0
)