首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写( )。 Private Sub Command1_Click() Dim inData As String Text1.T
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写( )。 Private Sub Command1_Click() Dim inData As String Text1.T
admin
2017-03-26
41
问题
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1中显示出来。在横线处应填写( )。
Private Sub Command1_Click()
Dim inData As String
Text1.Text=" "
Open".\smtext1.txt"______________As#1
Do While______________
Input#1.inData
Text1Text=Text1.Text&inData
Loop
Close#1
End Sub
选项
A、Input(EOF(1))
B、Input(Not EOF(1))
C、Append(Not EOF(1))
D、Append(EOF(1))
答案
B
解析
本题考查文件的操作。程序首先要以读文件的方式(Input)打开文件,题中说明这是个顺序文件,那么如果文件指针没有到文件尾(EOF(1)的值为False),就要从文件中读出数据,所以循环条件应以是否到文件尾为依据,判断是否继续循环。
转载请注明原文地址:https://kaotiyun.com/show/9mGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
设x=4,y=6,则以下不能在窗体上显示出“a=10”的语句是______。
以下正确的叙述是:_______。
若有一个动态数组a有两个元素a(0)和a(1),现要令数组a有三个元素a(0)、a(1)和a(2),则应当使用【】语句。
以下程序用于计算“1+1/3+1/5+…+1/(2n+1)”,直至“1/(2n+1)”小于10-4。阅读下面程序,请在【】和【】处填上正确内容。PrivateSubCommand1_Click()Sum=h:n=idon=【
执行如下程序段后,intsum的值为______。PrivateSubCommand1_Click()sum=0Fori=1To18Step2Forj=2To6If(iModj)<>0Thensum=sum+jNex
假定有以下循环结构DoUntil条件表达式循环体Loop则以下正确的描述是
复选框的Value属性为0时,表示该复选框()。
表达式Len(Str(1.3))Mod2的值为______。
在程序运行期间可以将图形装入窗体、图片框或图像框的函数是
除了VisualBasic系统默认的工具箱布局之外,还可以通过______定义选项卡来安排控件。
随机试题
下列属于鲁迅杂文集的是()
下列哪项不是急性心肌梗死的体征
A.血尿B.血红蛋白尿C.肌红蛋白尿D.卟啉尿E.药物性红尿马,7岁,营养良好,半月余未参加任何活动,参加比赛后24小时发病,后肢瘫痪,排红色尿液。最可能的红尿性质是()
A.独活B.黄芩C.细辛D.知母E.前胡属于小青龙汤组成药物的是
某市政工程基础采用明挖基坑施工,坑壁采用网喷混凝土加固。A公司中标后把基坑部分擅自分包给不具备安全资质的B公司。B公司开挖施工时把大量挖土弃置于基坑顶部,建设单位及监理单位发现后对B公司劝阻,但B公司不予理会;基坑施工时为加快进度,B公司采用了一次开挖到底
某工程施工合同约定2004年1月1日业主应向承包商支付工程款,如果承包商一直没有提出索要工程款的要求,业主也没有主动提出同意支付工程款,则()。
放行是检验检疫机构对列入法定检验检疫的出入境货物出具规定的证件,表示准予出入境并由海关监管验放的一种行政执法行为。( )
UKhouseholdsarecuttingbackonspendingatthefastestratesince1980.Thisiscontributingtotheworsteconomicslowdowni
Access表由【】和【】两部分构成。
AllChange[A]Thebasicmodeloftheelectricityindustrywastosendhighvoltagesoverlongdistancestopassivecustomers.Po
最新回复
(
0
)