首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序执行时,将把当前目录下的顺序文件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
50
问题
下面的程序执行时,将把当前目录下的顺序文件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://www.kaotiyun.com/show/9mGp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
单击一次命令按钮之后,在对话框中输入12,2,34,.23,窗体中的输出结果为______。PrivateSubCommand1_Click()a=10:b=20:c=30Callcheck(a,
设有如下程序:Subf(xAsInteger,ByValyAsInteger)X=2*xy=y+XEndSubPrivateSubCommandlClick()DimaAsInteger,bAsIn
下列能判断是否到达文件尾的函数是()。
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()DimiAsIntegerDimsumAsIntegerDimsu
下列不能打开菜单编辑器的操作是()。
数据库系统的核心是
如果在程序中要将c定义为静态变量,且为整型数,则应使用的语句是
在关系模型中,二维表的行称为______。
建立一个新的标准模块,应该选择哪个菜单下的“添加模块”命令?
在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()Forn=1T020IfnMod3
随机试题
患者,女性,73岁。非胰岛素依赖型糖尿病史28年,近6年出现蛋白尿及高血压,近2年来肾功能逐渐减退。3个月前开始出现恶心、呕吐,伴双下肢水肿。近日化验血K+5.5mmol/L,CO2CP16.5mmol/L,Cr830/μmol/L,Hb6.5g/dl,血
一位住院患者,住院15日后出现类似伤寒症状,病情较轻、发热38℃,腹泻,腹部疼痛,粪便培养鼠伤寒沙门菌阳性。该患者发病前这个病室有一类似症状患者,两人有食物交换。属于哪一种感染类型
X线管阳极接受电子撞击产生X线,由阳极头、阳极帽、阳极柄构成。能用于制造固定阳极X线管靶面的材料是
下列属于皮肌炎(DM)的特征性皮疹有
某老年患者全口无牙颌,进行义齿修复时,发现左侧颊系带附着于牙槽嵴顶,影响将来义齿固位。应该采用的治疗措施是
郭冬是个体户老刘的雇工。2009年3月8日,郭冬开车拉货返回老刘的商店途中,撞伤了下班后回家的卢小美。卢小美住院治疗一个多月后,要求郭冬赔偿。经郭冬所在街道的人民调解委员会主持,卢小美与郭冬达成协议:郭冬一次性赔偿给卢小美2万元,卢小美以后不得再以此事提出
[2013年第48题]图4.1.10所示结构直杆BC,受载荷F、g作用,BC=L,F=qL,其中q为载荷集度单位N/m,集中力以牛顿计,长度以米计,则该主动力系对O点的合力矩为()。
《砌体工程施工质量验收规范》规定,施工时所用的小砌块的产品龄期不应小于()
对于二手房个人住房贷款,商业银行最主要的合作单位是()。
按照《收养法》的规定,下列情况符合收养条件的是()
最新回复
(
0
)