首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Commandl_Click() Open"c:\f1.txt"F
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Commandl_Click() Open"c:\f1.txt"F
admin
2017-06-21
37
问题
窗体上有一个名称为Commandl的命令按钮。要求编写程序,把文件f1.txt的内容写到文件f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub Commandl_Click()
Open"c:\f1.txt"For Input As #1
Open"c:\12.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 Alt
答案
B
解析
打开文件的基本格式为:open FileName For Mode As#FileNumber。打开方式主要有output、Appcnd、Input、Random等几种。本题中打开了两个文件,其中1号文件用于读取,2号文件用于写入。当进行读取时循环条件应该为Not EOF(1)即还没有读取到文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/EWGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
窗体设计窗口的主要功能是______。
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Dima(1To10)Dimp(1To3)k=5Fori=1To10
快捷键Ctrl+O的功能相当于执行文件菜单中的______命令。
有如下Sub过程:SubSun(xAsSingle,yAsSingle)t=xx=t/yy=tModyEndSub在窗体上的命令按钮Command1中,编写如
以下程序的功能是:求x的y次方。根据题意,请完善下列程序。PrivateFunctionfunl(xAsDouble,yAsInteger)AsDoubleDimiAsIntegerDimzAsDoublez=【】
若要在图片框中绘制一个椭圆,使用的方法是______。
在窗体上画一个文本框,名称为Text1,画一个命令按钮,名称为Commandl。程序运行时,单击命令按钮,能将事先输入到文本框中的内容一个字符一个字符地写入顺序文件test.dat中。请在空白处填上适当的内容,将程序补充完整。PrivateSubC
下列各项中,不是通用过程特点的是()。
以下关于KeyPress事件过程中参数KeyAscii的叙述中正确的是
表达式“12345“”1234a”&“ABC”的值是_____________。
随机试题
某女,45岁。因宫颈癌需做广泛子宫切除和盆腔淋巴结清扫术。手术当天的护理,错误的是
按照国家规定,进口如下那些货物报检时必须提供装船前检验证书( )。
下列有关执行政府定价或者政府指导价的合同履行规则的说法中,正确的有()。
某企业某月销售商品发生商业折扣20万元、现金折扣15万元、销售折让25万元。该企业上述业务对当月主营业务收入影响的金额表述正确的是()。
______是人与人相互区别的主要方面,是人格的核心。
在对某厂矿职业人群进行健康监护时。发现某种常见病发病率明显高于一般人群,这种疾病很可能是()。
Imaginefishermenwalkingdowntotheseashore,readytocarryouttheirearlymorningroutineofpreparingtheirboatsandnet.
在SELECT-SQL语句中,不能使用的函数是______。
一幅图像的尺寸为、1024×768,65536色(深度为16位),则它所具有的数据量为()。
WiththereforminChina’sHigherLearning,mostcollegestudentsfeelthattheyarefortunateenoughtobeabletotakeelectiv
最新回复
(
0
)