首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
窗体上有一个名称为Command 1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件 f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command 1_Click() Open"c:\f1.t
窗体上有一个名称为Command 1的命令按钮。要求编写程序,把文件f1.txt的内容写到文件 f2.txt中,然后将f1.txt删除。命令按钮的单击事件过程如下: Private Sub Command 1_Click() Open"c:\f1.t
admin
2015-05-29
69
问题
窗体上有一个名称为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 Output As#2
Do、While Not EOF(2)
Line Input#1.strl
Print #2,strl
Loop
Close Kill"c:\f1.txt"
End Sub
该程序运行时发生错误,应该进行的修改是
选项
A、打开n.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/mRQp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
一个关系中属性个数为1时,称此关系为
如图所示,在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配项
程序是一个窗体双击事件代码,窗体的名称是Mywindow。窗体上有一个名为text1的文本框,用来显示文本。程序段首先在文本框中显示“窗体能够触发双击事件”然后将该文本清除;重复上述过程5次。OptionExplicitPriva
在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Textl、Labell和Commandl,然后编写如下两个事件过程:PrirateSUbCommand1Click()strText=InputBox(“请输
在窗体上画一个命令按钮,名称为Commad1,然后编写如下事件过程:PrivateSubCommand1Click()a$="softwareandbardware"b$=Right(a$,8)
设有如下程序PrivateSubFormClick()DimaAsInteger,bAsIntegera=20:b=50p1a,bp2a,b
关于结构化程序设计原则和方法的描述错误的是()。
下列叙述中正确的是()。
下列叙述中正确的是()。
设有数组定义语句:Dima(5)AsInteger,List1为列表框控件。下列给数组元素赋值的语句错误的是
随机试题
简述租赁合同中承租人的主要义务。
A、射频消融术B、苯妥英钠C、维拉帕米D、同步直流电复律E、非同步电复律心功能不全并发房颤心室率快()
患者,男,33岁,患有"痔疮"史。因食辛辣之品导致便血,血溅如注,血色鲜红,肛门灼热,舌红苔黄,脉数者。治宜选用
下列各项费用中的()没有包含关税。
已知第②层土粉质黏土的抗剪强度指标为上图所示,基础底面尺寸为3.0m×5.1m,则该土层的承载力特征值fa为______。根据上图所示基础的条件,且基础尺寸为3.0m×5.1m,已知土层②的地基承载力特征值fak=250kPa,则基底的地墓承载力特征
根据《水电建设工程质量管理暂行办法》,下列有关设计质量管理的说法正确的是()。
下列符合税务师职业道德基本要求的有()。
关于分泌管的描述,以下错误的是()。
“式”这一法律形式源于汉代的()
Ifyouwanttosucceed,youhavetobepassionate【C1】______yourwork.Ithastobetrue.【C2】______speakersaroundtheglobe
最新回复
(
0
)