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

admin2015-06-30  27

问题 文件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,选C。
转载请注明原文地址:https://jikaoti.com/ti/7P60FFFM
0

最新回复(0)