首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command 1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件 f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command 1_Click() Open”c:\f1.txt”
窗体上有一个名称为Command 1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件 f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command 1_Click() Open”c:\f1.txt”
admin
2015-05-29
42
问题
窗体上有一个名称为Command 1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件
f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub Command 1_Click()
Open”c:\f1.txt”For Input As#1
Open"c:\f2.txt"For Outout 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 A11
答案
B
解析
打开文件的基小格式为:Open FileName For Mode As#FileNumber。打开方式主要有Output、Append、Input、Random等几种。本题中打开了两个文件,其中1号文件用于读取,2号文件用于写入。当进行读取时循环条件应该为NotEOF(1)即还没有读取到文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/JDQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
文本框控件最多能处理______个字节。
下列关于栈的叙述正确的是
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1Click()Dimarray1(10,10)AsInteger
设有程序:OptionBase1PrivateSubCommand1Click()Dimarrl,MaxasIntegerarrl=Array(12,435,76,24,78,54,866,43)
一个类可以从直接或间接的祖先中继承所有属性和方法。采用这个方法提高了软件的【】
在窗体上面画一个名称为TxtA的文本框,然后编写如下的事件过程:PrivateSubTxtA_KeyPress(Keyasciiasinteger)……EndSub若焦点位于文本框中,则能够触发KeyPres
计时器控件能有规律的以一定时间间隔触发______事件,并执行该事件过程中的程序代码。
为了在列表框中使用<Ctrl>和<Shift>键进行多个列表项的选择,应将列表框的MultiSelect属性设置为()。
不能脱离控件(包括窗体)而独立存在的过程是()。
随机试题
关于胃十二指肠溃疡病手术治疗的叙述,下列哪些是正确的
人类维生素D的主要来源是
高层建筑金属管道干管的连接方式有()。
下滑信标台的场地保护区中,()组成敏感区。
“轿从前门进,船从家中过”描写的是周庄俗称“张厅”的玉燕堂。()
某企业有甲、乙、丙三个仓库,都在一条直线上,之间分别相距1千米、3千米,三个仓库里面分别存放货物5吨、4吨、2吨。如果把所有的货物集中到一个仓库,每吨货物每千米运费是90元,请问把货物放在哪个仓库最省钱?
“我今天是无事不登三宝殿”,用的是___________修辞。(上海大学2016)
小林因未带游泳帽被拒绝进入深水池,小林出示深水合格证说:根据规矩我可以进入深水池。游泳池的规定是:未戴游泳帽者不得进入游泳池,只有持有深水合格证,才能进入深水池。小林最有可能把游泳池的规定理解为:
Oneofthebigger,nonpoliticalstoriesofthesummerhasbeenthedecisionbyLanceArmstrongtodrophisfighttoclearhisna
SevenStepstoaMoreFulfillingJobManypeopletodayfindthemselvesinunfulfillingworksituations.Infact,oneinfour
最新回复
(
0
)