文件d：＼city．txt的内容如下： BeiJing TianJin ShangHai ChongQing 编写如下事件过程： Private Sub Form—Click() Dim InD Op

admin2017-12-13 104

问题文件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、空白