首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command 1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件 f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command 1_Click() Open”c:\f1.txt”
窗体上有一个名称为Command 1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件 f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command 1_Click() Open”c:\f1.txt”
admin
2015-05-29
40
问题
窗体上有一个名称为Command 1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件
f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下:
Private Sub Command 1_Click()
Open”c:\f1.txt”For Input As#1
Open"c:\f2.txt"For Outout 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 A11
答案
B
解析
打开文件的基小格式为:Open FileName For Mode As#FileNumber。打开方式主要有Output、Append、Input、Random等几种。本题中打开了两个文件,其中1号文件用于读取,2号文件用于写入。当进行读取时循环条件应该为NotEOF(1)即还没有读取到文件结尾。
转载请注明原文地址:https://kaotiyun.com/show/JDQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
以下说法错误的是______。
有如下程序:PrivateSubFormClick()DimiAsInteger,sumAsIntegersum=0Fori=2To10IfiM
有如下程序:PrivateSubFormClick()DimCheck,CounterCheck=TrueCounter=0DoDoWhileCounter<20
在窗体上画一个列表框和一个命令按钮,其名称分别为List1和Command1,然后编写如下事件过程:PrivateSubFormLoad()List1.AddItem"Item1"List1.Addltem"It
在窗体上画两个文本框,其名称分别为Text1和Text2,然后编写如下程序:PrivateSubForm_Load()ShowText1.Text=""Text2.Text="’’Text1.S
在窗体上画一个名称为Commandl的命令按钮,然后编写如下程序:PrivateSubCommand1_Click()StaticXAsIntegerStaticYAsIntegerCls
完全不考虑程序的内部结构和内部特征,而只是根据程序功能导出测试用例的测试方法是
鼠标移动经过控件时,将触发控件的______事件。
随机试题
患者张某,男性,60岁。胸闷气短反复发作2年余,动则更甚,伴有自汗,面色苍白,神倦怯寒,手足不温,舌质淡胖,边有齿痕,苔白或腻,脉沉细迟。其治法是
与消化性溃疡形成相关的因素是
5个男生与6个女生,从中选出5人出来参加智力大赛,要求其中至少有1名男生,问有多少种方法?()
大多数监理单位都有顾客满意的测量过程,采用的方法有( )。
背景施工单位甲承揽了国内某机场(单跑道)跑道加长的建设任务,建设单位的基本要求之一是该项工程的施工不能影响机场的正常运行。在施工过程中发生了以下事件:事件一:施工单位在水泥混凝土道面面层正式施工前,摊铺了试验段。事件二:施工单位绘制了施工进度计划网络
信用卡透支利率是日利率的()。
以依法可以转让的股票出质的,出质人与质权人应当订立书面合同,并向证券登记机构办理出质登记。质押合同自()起生效。
柯尔伯格发现儿童的道德发展普遍经历了()几个水平。
王某和李某系夫妻关系,对婚姻关系存续期间所得财产的归属并未作出约定。2008年,两人购买了一辆本田轿车。2010年9月,因夫妻矛盾,李某赌气离家。1个月后,王某未与李某协商,并伪造了李某同意卖车的授权书,以25万元的价格将本田车卖给张某,并于当天到交管部门
AnswerquestionsbyreferringtotheintroductionsofthreeuniversitiesfromaguidebookofAustralianuniversities.A=Me
最新回复
(
0
)