首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将fl.txt删除。命令按钮的单击事件过程如下: Private Sub Commandl_Click() Open”c:\f1.tx
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将fl.txt删除。命令按钮的单击事件过程如下: Private Sub Commandl_Click() Open”c:\f1.tx
admin
2018-10-15
58
问题
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将fl.txt删除。命令按钮的单击事件过程如下:
Private Sub Commandl_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,strl
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号文件用于写入。当进行读取时循环条件应该为Not EOF(1)即还没有读取到文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/tTFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下有关表达式的说法中,正确的是
深度为7的二叉树共有127个结点,则下列说法中错误的是
文件列表框中用于设置或返回所选文件路径和文件名的属性是
在考生文件夹下有一个工程文件sjt5.vbp,其窗体上添加有两个名称分别为Text1、Text2的文本框,其中Text1中MutiLine属性为True。请添加两个名称为Command1、Command2,标题分别为“产生数组”、“查找”的命令按钮,如图所
下面程序的功能是:先输入一个字符串,再输入3个字符,然后统计这3个字符分别在字符串中出现的次数并输出PrivateSubCommand1_Click()Dimch$(3),str$,prompt$,count%(3)str
For循环的循环控制变量
(1)在名称为Form1的窗体上添加一个名称为Label1标题为“添加项目”的标签;添加一个名称为Text1的文本框,初始内容为空;添加一个名称为Combol的下拉式组合框,并通过属性窗口输入若干项目(不少于3个,内容任意);再添加两个命令按钮,名称分别为
如果在列表框List1中没有选中项目,则List1.ListIndex的值为()。
以下打开VisualBasic菜单编辑器的操作中,错误的是()。
以下关于文件的叙述中,错误的是()。
随机试题
下列选项中,符合所给图形的变化规律的是()。
下列关于胆囊癌的叙述,哪项是正确的
正常人每日通过肾小球滤过的原尿约
两个以上生产经营单位在同一作业区域内进行生产经营活动,可能危及对方生产安全的,应当签订安全生产管理协议。()
在任何市场上,能反映某种商品的市场供求状况是商品的()。
()是工艺过程最基本的组成单位。
即使穿过玻璃或水这样的普通透明材料,光速也会略微降低,因为光会与组成材料的原子相互作用。但是在这种情况下,影响是微弱的,并且任何加强这种影响的试图都会导致光的吸收。因此,重要的是使光的速度降低,而且不至于被吸收。韦尔奇博士通过小室做到了这一点。这种方法把铷
甘肃地处黄土高原、青藏高原和内蒙古高原三大高原的交汇地带。境内地形复杂,山脉纵横交错,海拔相差悬殊,高山、盆地、平川、沙漠和戈壁等兼而有之,是山地型高原地貌。()
根据给定资料,分别指出我国网络媒体的积极作用和网络传播内容存在的主要问题。(20分)要求:全面准确,语言简洁,200字左右。“给定资料6”中国人民大学C教授认为,“人肉搜索”是一把双刃剑。请简要谈谈你对这句话的理解。(20分)要求:观点明确,分析深
在VBA中,能自动检查出来的错误是
最新回复
(
0
)