首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件 f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command l Click() Open“c:\f1.txt”F
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件 f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command l Click() Open“c:\f1.txt”F
admin
2015-12-09
22
问题
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件
f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub Command l 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
选项
A、打开f1.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/hALp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
下列程序段的执行结果为a=3:b=1Fori=1To3f=a+b:a=b:b=fPrintfNextI
在窗体上有一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dima(5)AsStringFORi=1To5a(i)=Chr(Asc("A")+(i-1))NextForEachb
下面不属于软件设计原则的是
在dountil…Loop循环中,判断循环表达式与结束循环的关系是______。
为了使模块尽可能独立,要求
设有如下变量声明DimtimelAsDate,为变量timel正确赋值的表达式是()。
下列叙述中,不属于软件需求规格说明书的作用的是
用树形结构表示实体之间联系的模型是____________。
下列运算符中,优先级别最高的是
随机试题
《早雁》中,暗示逃难民众有家难回的诗句是()
下列蒽醌类化合物中,酸性强弱顺序是
A.右心房、右心室大,肺野充血,肺动脉段凸出,主动脉结较小B.右心房、右心室大,肺野清晰,肺动脉段凹陷,主动脉结增大C.右心房、右心室大,肺野清晰,肺动脉段凸出,主动脉结正常D.左心房、左心室大,肺野充血,肺动脉段凸出,主动脉结增大E.左心房、左心
患者,女,70岁。慢性支气管炎病史,憋喘、呼吸困难3天。查体:神志清,体温37.8℃,脉搏102次/分,呼吸30次/分,血压100/60minHg,双肺呼吸音低,可闻及干啰音及哮鸣音,腹软,肝肋下2cm可触及,质中等,腹水征(+),双下肢水肿(+)。考
二妙散的功用是
目前上海和深圳证券交易所的权证交易()。
某企业2016年度利润总额为500万元,其中公司债券利息收入为15万元。假定当年按税法核定的全年业务招待费的扣除标准为300万元,实际发生的业务招待费为290万元,税收滞纳金为10万元。假定该企业无其他纳税调整项目,适用的所得税税率为25%。该企业2016
在分析会计报表时,若采用趋势分析法对相同指标进行对比时,必须注意()问题。
20世纪末到21世纪初,信息传播的途径进一步________,最突出的是视听手段和互联网空前快速的发展,声音和图像________涌到了大家的面前;连那些识字不多的百姓,也能通过电视获得不少信息。填入画横线部分最恰当的一项是:
强调“法国今后仍然坚持中央集权制的课程管理体制,课程大纲以《政府公报》的形式颁布,各地必须认真实施”“课程编制应以学生为中心,使全体学生具备较高的素质”“对学科体系进行综合改革,既有从小学到高中课程融为一体的纵向综合改革,也有各科知识融会贯通的横向综合改革
最新回复
(
0
)