首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
为了从当前文件夹中读人文件Filel.txt,某人编写了下面的程序: Private Sub Commandl_Click() Open“Filel.txt”For Output As#20 Do While NOt EOF(20)
为了从当前文件夹中读人文件Filel.txt,某人编写了下面的程序: Private Sub Commandl_Click() Open“Filel.txt”For Output As#20 Do While NOt EOF(20)
admin
2013-01-23
58
问题
为了从当前文件夹中读人文件Filel.txt,某人编写了下面的程序:
Private Sub Commandl_Click()
Open“Filel.txt”For Output As#20
Do While NOt EOF(20)
Line Input#20,ch$
print ch
Loop
Close#20
End Sub
程序调试时,发现有错误,下面的修改方案中正确的是
选项
A、在Open语句中的文件名前添加路径
B、把程序中各处的“20”改为“1”
C、把Print ch语句改为Print#20,ch
D、把Open语句中的Output改为Input
答案
D
解析
本题要求从当前文件夹中读入文件,因此在()pen语句中应使用输入(Input)打开文件。
转载请注明原文地址:https://www.kaotiyun.com/show/zchp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
当Form1_Click事件发生时,窗体上显示的第三行是()。OptionBase1PrivateSubForm_Click()DimiAsInteger,jAsIntegerDimk
在窗体上有一个计时器控件Timer1和一个标签控件Labe11,在程序运行的时候,可通过每隔30ms让Labe11左移100缇,从而产生文字移动动画效果。文字从右向左移动,当移动到接近窗体左边界时停止移动,如图20-9所示。空格处应填()。
窗体的()方法可把窗体隐藏起来,但不从内存中卸载。
单击按钮时,以下列程序运行后的输出结果是PrivateSubproc1(xAsInteger,yAsInteger,zAsInteger)x=3*zy=2*zz=X
单击命令按钮时,下列程序的执行结果为 PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=50:y=78Call
定义过程的格式中,Static关键字的作用是指定过程中的局部变量在内存中的存储方式。若使用了Staff关键字,则
编写了如下事件过程:PrivateSubForm_KeyDown(KeyCodeAsInteger,ShiftAslnteger)If(ButtonAnd3)=3ThenPrint“A
为了在按下Esc键时执行某个命令按钮的事件过程,需要将该命令按钮的一个属性设置为True,这个属性是
假设窗体中已经有了一个驱动器列表框Drivel和一个目录列表框Dirl,如图20-10所示。当改变了驱动器列表框中的驱动器时,希望在目录列表框中显示相应驱动器的目录结构,可在Drive1_Change事件中输入语句【】。
在程序代码中将图片文件mypic.jpg装入图片框Picture1的语句是______。
随机试题
民事义务依义务人行为的方式或者内容可划分为积极义务和消极义务,下列各项中,属于消极义务的有()。
下列选项中,属于外部招募特点的是()。
调查报告的主要特点是()
A.包扎疗法B.暴露疗法C.开放疗法D.湿敷疗法E.浸泡疗法易造成交叉感染的方法是
经营单位持主管海关签发的“开设银行保证金台账联系单”,向主管海关指定的()办理保证金台账设立手续。
要求发行人在发行债券过程中,不仅要公开披露有关信息,而且必须符合一系列实质性的条件的是()制度。
“春秋三传”不包括下列哪一项?()
Whatshouldonedoifhewantstoworkmoreefficientlyathislowpointinthemorning?
A、ItwasestablishedinGeorgeWashingtonUniversityin1937.B、ItwasestablishedintheNationalMuseumofAmericanHistoryin
Would-belanguageteacherseverywherehaveonethingincommon:theyallwantsomerecognitionoftheirprofessionalstatusand
最新回复
(
0
)