首页
外语
计算机
考研
公务员
职业资格
财经
工程
司法
医学
专升本
自考
实用职业技能
登录
计算机
文件d:\city.txt的内容如下: BeiJing TianJin ShangHai ChongQing 编写如下事件过程: Private Sub Form_Click() Dim InD Open "d:\city.txt" For
文件d:\city.txt的内容如下: BeiJing TianJin ShangHai ChongQing 编写如下事件过程: Private Sub Form_Click() Dim InD Open "d:\city.txt" For
admin
2018-07-11
41
问题
文件d:\city.txt的内容如下:
BeiJing
TianJin
ShangHai
ChongQing
编写如下事件过程:
Private Sub Form_Click()
Dim InD
Open "d:\city.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, InD
Loop
Close 1
Print InD
End Sub
运行程序,单击窗体,输出结果是
选项
A、文件city.txt的全部内容
B、BeiJing
C、ChongQing
D、空白
答案
C
解析
#1文件以读操作的方式打开。在文件结尾的部分退出。退出时InD内存储的内容是ChongQing,打印的内容就是ChongQing,选D)。
转载请注明原文地址:https://kaotiyun.com/show/KzFp777K
本试题收录于:
二级VB题库NCRE全国计算机二级分类
0
二级VB
NCRE全国计算机二级
相关试题推荐
某人编写了如下程序,用来求10个整数(整数从键盘输入)中的最大值:PrivateSubCommand1_Click()Dima(10)AsInteger,maxAsIntegerFork=1To10a(k)=InputB
用来设置文字字体是否斜体的属性是
窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:OptionBase1PrivateSubCommand1_Click()Dima(4,4)AsIntegerFori=1To4Forj=1To
窗体上有名称为Command1的命令按钮和名称为Text1的文本框PrivateSubCommand1_Click()PrivateSubText1_GotFocus()Text1.Text="程序设计"
下列程序段执行后,输出的结果是()。Fork1=0To4y=20Fork2=0To3y=10Fork3=0To2y=y+10Nextk3Nextk2Nextk1 Printy
下列程序执行后,其输出结果为()。Dima(5)Fori=0To4a(i)=i+1:m=i+1Ifm=3Thena(m-1)=a(i-2)Elsea(m)=a(i)Ifi=2Thena(i-1)=a(m-3)a(4
对长度为n的线性表作快速排序,在最坏情况下,比较次数为
设循环队列的存储空间为Q(1:35),初始状态为front=rear=35。现经过一系列入队与退队运算后,front=15,rear=15,则循环队列中的元素个数为
随机试题
下列哪个药物不能用于心源性哮喘
人类学的基准线系指
A.太渊B.合谷C.后溪D.内关E.阳池既是原穴,又是八会穴的腧穴是()
患儿11个月,因睡眠不安、多汗、易惊来院就诊。体检可见明显方颅、肋骨串珠,诊断为佝偻病活动期该患儿最合适的治疗方法是
水平悬吊的主、干风管长度超过20m时,应设置防止摆动的固定点,每个系统不应少于1个。()
需要提示承兑方可使用的票据是()。
关于制定工资指导线的说法,正确的有()。
莲子:爱慕
Theoceanbottom—aregionnearly2.5timesgreaterthanthetotallandareaoftheEarth—isavastfrontierthateventodayisl
A、boththedollarandtheeurowerestrongB、boththedollarandtheeurowereweakC、thedollarwasstrongwhiletheeurowasw
最新回复
(
0
)