首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open"c:\f1.txt"For
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open"c:\f1.txt"For
admin
2016-12-13
59
问题
窗体上有一个名称为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 FileName For Mode As#FileNumber,打开方式主要有Output、Append、Input、Random等几种。本题中打开了两个文件,其中1号文件用于读取,2号文件用于写入。当进行读取时循环条件应该为NotEOF(1)即还没有读取到文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/m6Gp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
数据库恢复是将数据库从_______状态恢复到某一已知的正确状态。
下列关于文件的叙述中,错误的是()。
下列关于复选框的说法,正确的是()。
在用通用对话框控件建立“保存”文件对话框时,如果需要指定文件列表框所列出的文件类型是文本文件(即.txt文件),则正确的描述格式是()。
执行x$一InputBox(“请输人x的值”)时,在弹出的对话框巾输入123,在列表框Listl中选中一个列表项(数据为456),使结果为123456的语句是()。
不能打开菜单编辑器的操作是______。
新建一工程,将其窗体的Name属性设置MyFirst,则默认的窗体文件名为()。
线性表的顺序存储结构和线性表的链式存储结构分别是______。
要使菜单项MenuOne在程序运行时失效,使用的语句是
实体是信息世界中广泛使用的一个术语,它用于表示()。
随机试题
下列属于实用新型专利保护的客体是()。
The1920ssawtheemergenceofanewpsychologicalschoolcalled______foundedbyagroupofpsychologists.
具有油室的药材是
男,18岁,左下肢跛行15年,查体发现左侧马蹄内翻足畸形,胫前肌有轻度肌收缩,但不能产生关节运动,其肌力为
固结灌浆施工程序依次是()。
丁公司是一家创业板上市公司,2016年度营业收入为20000万元,营业成本为15000万元,财务费用为600万元(全部为利息支出),利润总额为2000万元,净利润为1500万元,非经营净收益为300万元。此外,资本化的利息支出为400万元。丁公司存货年初余
情绪不仅影响行为的内容,也影响行为的方向和强度。青春期是情绪发展的重要阶段,也是情绪问题的高发时期,这一时期情绪的典型特征是“暴风骤雨”。如何引导青少年认识情绪、调节情绪和运用情绪是这一阶段的重要发展任务。当面对突如其来的挑战时,有的人退缩不前,有的人直面
足球是一项集体运动,若想不断取得胜利,每个强队都必须有一位核心队员,他总是能在关键场次带领全队赢得比赛。友南是某国甲级联赛强队西海队队员。据某记者统计,在上赛季参加的所有比赛中,有友南参赛的场次,西海队胜率高达75.5%,另有16.3%的平局,8.2%的场
设求y(n)(n>1).
A、Spendmoretimeinthelibrary.B、Writejustonepaperforallhisclasses.C、Droponeofhiscourses.D、Writehispapersonc
最新回复
(
0
)