首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序执行时,将把当前目录下的顺序文件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
27
问题
下面的程序执行时,将把当前目录下的顺序文件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全国计算机二级
相关试题推荐
有如下程序:PrivateSubForm_Click() DimiAsInteger,nAsInteger Fori=1To20 i=i+4 n=n+i Ifi>10ThenExitFor
一般情况下,当对关系R和S进行自然连接时,要求R和S含有一个或者多个共有的
下列叙述中正确的是
在窗体上画1个名称为Command1的命令按钮,1个名称为Label1的标签,然后编写如下事件过程:PrivateSubCommand1_Click()DimmAsInteger,xAsIntegerDimtagAs
为了向c盘根目录下的Stud.txt文件中添加数据而不破坏其原有数据,下列正确打开该文件的语句是
(1)考生文件夹下的工程文件sjt3.vbp中有两个初始标题分别为“移动”和“退出”的命令按钮;一个初始状态为不可用的时钟Timer1。请添加一个标签Label1,其标题为“计算机考试”,字体为黑体小四号字,左边界为500,且能根据显示的内容自动调整大小,
窗体上有一个菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。下列说法错误的是()。
线性表的链式存储结构与顺序存储结构相比,链式存储结构的优点有
表达式Abs(-5)+Len("abcde")的值是
算法的空间复杂度是指( )。
随机试题
挥发性盐基总氮(TVBN)
A.金黄膏B.青黛膏C.红油膏D.白玉膏E.冲和膏患者小腿部红肿疼痛,外治应首选
关于荣誉的表述,哪项错误
甲有一条驳壳船租予乙进行海上运输,租期3年。双方签订了书面合同,乙一次性向甲交付租金50万元。租赁的第二年,甲因资金紧张将该船卖予丙,双方签订了买卖合同,价格500万元。约定在船舶过户登记后、乙的租期届满前,丙分期付清全部款项。因甲无法现实交付,双方约定租
甲于2月14日向乙发出签订合同的要约,乙于2月28日承诺同意,甲、乙双方在3月13日签订合同,合同中约定该合同于3月25日生效。根据合同法律制度的规定,该合同的成立时间是()。
2014年1月1日,甲与乙签订了一份机器设备的买卖合同,约定甲公司向乙公司出售其机器设备一套,由甲代办托运。2014年3月1日,甲公司将设备交付承运人丙公司,由丙公司将该设备运往乙公司指定地点,运输途中乙公司将该设备出卖给丁公司并签订合同。基于以上事实,下
(2008上系管)某待开发的信息系统,具体功能需求不明确,需求因业务发展需要频繁变动,适用于此信息系统的开发方法是______。
在考生文件夹下,打开文档Word1.docx,按照要求完成下列操作并以该文件名Word1.docx保存文档。将正文第一段(“对于微软官员,……人们应该持一个怀疑的态度。”),左右各缩进5字符,悬挂缩进2字符,行距18磅;将正文第三段(“同时,……对软件
Wheredotheymostlikelywork?
Howmenfirstlearnttoinventwordsisunknown;inotherwords,theoriginoflanguageismystery.Allwereallyknowisthatm
最新回复
(
0
)