首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序执行时,将把当前目录下的顺序文件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
39
问题
下面的程序执行时,将把当前目录下的顺序文件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”的语句是______。
设有如下程序:PrivateSubsearch(a()AsVariant,ByValkeyAsVariant,index%)DimI%ForI=Lbound(a)ToUbound(A)Ifke
在窗体上画1个名为Text1的文本框和1个名为Label1的标签,再画4个名为Op1的单选按钮控件数组,其Index属性按季度顺序为0~3,如图1所示。在文件Sales.txt中按月份顺序存有某企业某年12个月的销售额。要求在程序执行时,鼠标单击一个单选按
窗体的属性可在属性窗口中设置,也可在程序中用【】语句动态设置。
函数Str$(256.36)的值是______。
执行下面的程序段后,S的值为【】。s=5Fori=2.6To4.9Step0.6s=s+1Nexti
窗体上有一个命令按钮Command1和一个列表框List1。先选择列表框中的某一个项目,然后单击命令按钮,将该项目从列表框删除。程序如下:PrivateSubCommand1_Click()DimInAsIntegerIn=______L
对话框在关闭之前,不能继续执行应用程序的其他部分,这种对话框属于()。
在VisualBasic中,组合框是文本框和()特性的组合。
随机试题
着痹的特征是
关于煮沸消毒法,下列说法中错误的是
《担保法》规定抵押权因抵押物的灭失而灭失,所以土地抵押权为()。
关于仲裁审理案件的相关规则和程序规定,下列表述中()是正确的。
如何使用仿制图章工具在图像中取样?()
1.天刚刚亮,Roy已经开始了一天的工作。Roy是上海某知名营销策划机构的首席策划师,在他眼里,即将到来的中国传统节日将迎来一场传统文化的复兴,而在这场复兴运动中,主角是商业。作为一个专业策划人,Roy住着洋房,穿着阿玛尼,开着别克,用着英文名字
【《瀛环志略》】厦门大学2000年中国通史真题;武汉大学2002年中国近现代史真题;南京师范大学2011年中国近现代史复试真题;河北师范大学2013年中国史真题
以下是某商场的购物记录集合,每个购物篮中包含若干商品。现在要基于该数据集进行关联规则挖掘,如果设置最小支持度为60%,最小置信度为80%,则在以下列出的关联规则中,符合条件的是()。
NewTechniquePromisesEarlierCancerDetectionAnewtechniquecouldrevolutionizetheearlydetectionofcancer,givingsuf
A、Afour-manband,wearingcartooncharacters’custom.B、Avirtualband,composedoffictionalanimatedmembers.C、Acyberband,
最新回复
(
0
)