首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写( )。 Private Sub Command1_Click( ) Dim inData As Strin
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写( )。 Private Sub Command1_Click( ) Dim inData As Strin
admin
2018-09-29
69
问题
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写( )。
Private Sub Command1_Click( )
Dim inData As String
Text1.Text=" "
Open".\smtext1.txt"_______As#1
Do While____________
Input#1,inData
Text1.Text=Text1.Text&inData
Loop
Close #1
End Sub
选项
A、Input (EOF(1))
B、Input (Not EOF(1))
C、Append (NotEOF(1))
D、Append (EOF(1))
答案
B
解析
本题考查文件的操作。程序首先要以读文件的方式(Input)打开文件,题中说明这是个顺序文件,那么如果文件指针没有到文件尾(EOF(1)的值为False),就要从文件中读出数据,所以循环条件应以是否到文件尾为依据,判断是否继续循环。
转载请注明原文地址:https://kaotiyun.com/show/dhFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在考生文件夹下有一个工程文件sjt5.vbp,在其窗体中有一个实心圆。程序运行时,当用鼠标左键单击窗体任何空白位置时,实心圆则向单击位置直线移动;若用鼠标右键单击窗体,则实心圆停止移动。窗体文件中已经给出了全部控件,但程序不完整。要求:请去掉程序
(1)在名称为Form1的窗体上添加一个名称为Label1的标签,标签的宽和高分别为2000、300,有边框,并利用属性窗口设置适当的属性,使其标题“等级考试”居中显示,并使标签的外观如图所示。注意:存盘时必须存放在考生文件夹下,工程文件名保存为
下面描述中不属于数据库系统特点的是
为了调整图像框的大小以与其中的图形相适应,必须把它的Stretch属性设置为( )。
在窗体上画一个命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click() DimI,Num Randomize Do ForI=1To1000 Num=Int(Rnd*
为了将"联想电脑"作为数据项添加到列表框List1的最前面,可以使用语句()。
VisualBasic中的"启动对象"是指启动VisualBasic应用程序时,被自动加载并首先执行的对象。下列关于VisualBasic"启动对象"的描述中,错误的是( )。
下面关于组合框Cb1的叙述中正确的是
窗体上有一个名称为Combo1的组合框,为了引用Combo1中最后一个列表项,应使用的表达式是
随机试题
目前认为导致阴茎勃起的主要机制是:①通过细胞内环腺苷酸(cAMP)作用,导致平滑肌舒张。②通过细胞内环鸟苷酸(cGMP)作用,导致平滑肌舒张。③通过细胞内外K+、Ca2+的调节作用,导致平滑肌舒张。前列腺素E1(PGE1)和血管
Theschoolcommitteehopedthattheirchoiceofplaywouldbe________withthestudentsandtheirparents.
关于糖原累积病的病因下列哪项是正确的()
的收敛半径为()。
对一台购置后一直封存、从未使用过的286型计算机,应根据其已超过(),判定该计算机应淘汰。
甲、乙、丙、丁拟任A上市公司独立董事。根据上市公司独立董事制度的规定,下列选项中,不影响当事人担任独立董事的情形是()。
关于行政许可程序,下列哪一选项是正确的?()
宗教改革时期,影响最大的一部著作是加尔文写的()。
在一个(1)的早晨,老猎人刚从帐篷里出来就看见不远处站着一只肥肥壮壮的藏羚羊,他立刻举枪瞄准,可奇怪的是,那只藏羚羊并没有逃跑,(2)两条前腿扑通一声跪了下来,与此同时两行热泪从它的眼里涌出。老猎人心头一软,扣扳机的手不由得松了(3)。然而迫于生计老猎人双
SecretsofGrade-AParentsA)WhenCareyGrahamstartedGradeOne,hegotaveryspecialteacher."Sherecognizedmypassion
最新回复
(
0
)