文件d:\city.txt的内容如下: BeiJing TianJin ShangHai ChongQing 编写如下事件过程: Private Sub Form_Click() Dim InD Open"d:\city.txt"For Input As

admin2016-06-23  38

问题 文件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://jikaoti.com/ti/hmkiFFFM
0

最新回复(0)