首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1显显示出来。在横线处应填写( )。 Private Sub Commandl—Click() Dim inData As String
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1显显示出来。在横线处应填写( )。 Private Sub Commandl—Click() Dim inData As String
admin
2016-03-21
30
问题
下面的程序执行时,将把当前目录下的顺序文件smtext1.txt的内容读入内存,并在文本框Text1显显示出来。在横线处应填写( )。
Private Sub Commandl—Click()
Dim inData As String
Textl.Text=“”
Open“.\smtextl.txt”__As#1
Do While.
Input#1.inData
Text1.Text=Text1.Text&inData
Loop
Close#1
End Sub
选项
A、Input fEOF(1))
B、Input fNot EOF(1))
C、Append (Not EOF(1))
D、Append (EOF(1))
答案
B
解析
本题考查文件的操作。程序首先要以读文件的方式(Input)打开文件,题中说明这是个顺序文件,那么如果文件指针没有到文件尾(EOF(1)的值为False),就要从文件中读出数据,所以循环条件应以是否到文件尾为依据,判断是否继续循环。
转载请注明原文地址:https://kaotiyun.com/show/sgLp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
在一个窗体上有一个命令按钮CmdMax。单击CmdMax时,窗体上显示“字体由小变大”,字号每次增加2。请填空。PrivateSubForm_Load()Form1.Caption="字体变化示范"CmdMax.Caption="字体变大"En
在3种不同类型的组合框中,只能选择而不能输入数据的组合框是¬¬¬______。
在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后,在列表框中添加若干列表项。当双击列表框中的某个项目时,在标签Labe1中显示所选中的项目,如图所示。请在空白处填入适当的内容,将程序补充完整。PrivateSubForm
数据库管理系统常见的数据模型有层次模型、网状模型和______3种。
窗体上有名称为Text1、Text2的两个文本框,和一个由3个单选按钮构成的控件数组Option1,如图1所示。程序运行后,如果单击某个单选按钮,则执行Text1中数值与该单选按钮所对应的运算(乘1、乘10或乘100),并将结果显示在Text2中,如图2
下列程序段的输出结果是()。A=0PrintA+1A=3
线性表常采用的两种存储结构是()。
假定有如下的窗体事件过程:PrivateSubForm_Click()a$="MicrosoftVisualBasic"b$=Right(a$,5)c$=Mid(a$,1,9)MsgBoxa$,34,b$,c
在窗体(Name属性为Forml)上面添加两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(Name属性为Commandl),然后编写如下两个事件过程:PrivateSubCommandl_Click()a=Tex
数据结构作为计算机的一门学科,主要研究数据的逻辑结构、对各种数据结构进行的运算,以及
随机试题
下列哪项是所有休克的根本特征
机械性肠梗阻最常见的原因是
以下哪项是脑出血的最常见部位
主要成分非挥发油的药材是
根据企业所得税法律制度的规定,下列关于资产的表述中,不正确的是()。
根据合伙企业法律制度的规定,在普通合伙企业存续期间,下列行为中,除合伙协议另有约定的以外,无须经全体合伙人一致同意的是()。
遗憾的是,对于成人身上的价值观错位,人们通常无视,因为人们已对这种功利主义的价值观________。反而,当一个小孩子表现出错误的价值观时,人们一下子受不了了。一些人认为只要抓紧对孩子的教育引导,他长大后就能形成正确的价值观。这显然是回避了问题的实质——当
下面哪项不是存款创造的条件()。
Whatarethespeakersdoingastheconversationbegins?
InSeptember,inBritain,youmayseealotofbirds【C1】______onroofsandtelegraphwires.Thesebirdsareswallows.Theyare【C
最新回复
(
0
)