首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open"c:\f1
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command1_Click() Open"c:\f1
admin
2019-03-08
31
问题
窗体上有一个名称为Command1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub Command1_Click()
Open"c:\f1.txt"For Input As #1
Open"c:\f2.txt"For OutputAs #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方式,打开t2.txt应该使用Input方式
B、Not EOF(2)应该改为Not EOF(1)
C、Line Input应改为Get
D、Close语句改为Close AIl
答案
B
解析
打开文件的基本格式为:Open FileName For Mode As #FileNumber。打开方式主要有Output、Append、Input、Random等几种。本题中打开了两个文件,其中l号文件用于读取,2号文件用于写入。当进行读取时循环条件应该为Not EOF(1)即还没有读取到文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/kqFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设有如下声明语句OptionBase1Dimarr(2,-1To5)AsInteger则数组arr中数组元素的个数是
PrintFormat(1234.56,"###.#")语句的输出结果是( )。
下列叙述中正确的是
在窗体上画一个名称为Command1的命令按钮,并编写如下事件过程:PrivateSubCommand1_Click() x=1 s=0 Fori=1To5 x=x/i s=s+x Next Print
若窗体上有一个名为Command1的命令按钮,并有下面的程序:PrivateSubCommand1_Click() Dimarr(5)AsInteger Fork=1To5 arr(k)=k Nextk prog
设a=10,b=5,c=1,执行语句Printa>b>c后,窗体上显示的是( )。
以下关于控件数组的叙述中,正确的是( )。
为了判断字符串变量strName中的姓名是否姓"李",应采用的表达式是
优化数据库系统查询性能的索引设计属于数据库设计的
考生文件夹下有工程文件sjt5.vbp和数据文件in5.txt。in5.txt中有多条记录,每条记录占一行,含4个数据项,数据项的含义依次是:姓名、数学成绩、语文成绩、英语成绩。窗体上按钮“读取数据”的功能是把in5.txt中的所有记录读到数组a中(每个
随机试题
甲在饭店用餐时,乘人不备将该饭店店堂中一个古玩摆设(价值1万元)装入衣兜中,意图据为己有,未出店门就被店员发现,当场将其抓获。甲的行为属于犯罪未遂。
“我是月底光,我是日底光”两句出自郭沫若的诗()。
有关激素替代治疗说法正确的是
造成慢性化脓性骨髓炎的主要因素是
疟疾的主要病因为
提出实施规划的措施和有关建议,明确规划强制性内容的是()
1982年2月,张某占有了李某的私人房屋,长期无偿占用,李某对此一直不知,直到2001年2月,李某方从有关材料得知张某占用的房屋为自己所有,于是要求张某支付占用期间的房租,张某拒不同意,双方发生争议。李某此时的诉讼时效期间应截止到2002年2月。(
(广西2009—3)5,7,24,62,(),468
想象是指在原有经验的基础上创造新形象的思维活动。按照想象是否受意志控制,可分为随意想象和不随意想象。不随意想象的特点是把各种印象和信息离奇、突然、有时是无意义地组合在一起。随意想象是把各种印象和信息自觉控制、有目的、经过意志的努力呈现出需要的场景。根据上述
EasyBlend5000byRXHousewaresTheEasyBlend5000istheonlyblenderyouwilleverneed.Notonlyisitgoodformakingsoup
最新回复
(
0
)