首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command 1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件 f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command 1_Click() Open"c:\f1.t
窗体上有一个名称为Command 1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件 f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command 1_Click() Open"c:\f1.t
admin
2015-05-29
73
问题
窗体上有一个名称为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 Output As#2
Do、While Not EOF(2)
Line Input#1.strl
Print #2,strl
Loop
Close Kill"c:\f1.txt"
End Sub
该程序运行时发生错误,应该进行的修改是
选项
A、打开n.txt应该使用Output方式,打开f2.txt应该使用Input方式
B、Not EOF(2)应该改为Not EOF(1)
C、Line Input应改为Get
D、Close语句改为Close All
答案
B
解析
打开文件的基本格式为:Open FileName For Mode As#FileNumber。打开方式主要有Output、Append、Input、Random等几种。本题中打开了两个文件,其中1号文件用于读取,2号文件用于写入。当进行读取时循环条件应该为NotEOF(1)即还没有读取到文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/mRQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下合法的变量名是
假定建立了一个工程,该工程包括两个窗体,其名称分别为Form1和Form2,启动窗体为Form1。在Form1上画一个命令按钮Command1,程序运行后,要求当单击该命令按钮时,Form1窗体消失,显示Form2,请在空白处将程序补充完整。Pri
在窗体上画一个名称为Command1的命令按钮和三个名称分别为Label1、Label2、Label3的标签,然后编写如下代码:PrivatexAsIntegerPrivateSubCommand1_Click()St
程序运行后,在窗体上单击鼠标,此时窗体不会接收到的事件是
对长度为n的线性表进行顺序查找,在最坏情况下所需要的比较次数为
在窗体中添加一命令按钮,(其Name属性为Commmld1),然后编写代码。程序的功能是产生100个小于1000(不含1000)的随机正整数,并统计其中5的倍数所占比例。请在空白处填入适当的内容,将程序补充完整。PrivateSubCo
设在工程中定义了如下类型:TypestutypeinoAsIntegerstmameAsString*20strsexAsString*1smarkAsSingle
关于结构化程序设计原则和方法的描述错误的是()。
下列关于图像框控件和图片框控件的说法错误的是()。
随机试题
在Excel中,要清除选定单元格中的内容,最快捷的操作是()。
WhatwillRebeccadoonJune12?
CulturalDifferencesinEnglandandFranceCulturaldifferencescantakemanyforms.IhavenoticedmanydifferencesinFren
关于抗凝血酶(AT)的临床意义,正确的是()。
房地产项目的定价策略,是指开发商为了在目标市场上实现自己的定价目标,所规定的定价指导思想和定价原则。房地产总体定价策略一般可分为()。
背景A施工单位承担了某航站楼民航专业弱电系统工程施工任务,系统的机柜与服务器由业主提供。该工程4月1日开始施工,在施工过程中遇到以下情况:情况一:4月3日起,因业主原因停工3d。情况二:4月3日上午上班时,项目经理乙被告知应于该日到货安装的机柜将于7
下列关于水闸工程施工的说法正确的是()。
根据《票据法》的规定,下列关于本票的表述中,不正确的是()。
你要去参加一个会议,会上有你的发言,但是路上交通堵塞,无法前进也无法后退,你该怎么办?追问:你下车时撞到一位老太太,当场晕迷,你该怎么办?
YouwillhearashortmonologurtalkingaboutwhycarsaresopopularinAmerica.Foreachquestion(23-30),markoneletter(A,
最新回复
(
0
)