单选题
文件d：＼city．tXt的内容如下：BeiJingTianJinShangHaiChongQing编写如下事件过程：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 InDEnd Sub运行程序，单击窗体，输出结果是
【正确答案】
C
【答案解析】解析：Visual Basic程序中关于文件的操作，主要是先打开一个文件，然后对这个文件进行读或写的操作，操作完成后，关闭这个文件。打开文件的基本格式为：Open FileName For Mode As#FileNumber。打升方式主要有Output、Append、Input、Random等几种方式。以Input方式打开的文件主要用来读入数据，它与Input#、Line Input#语句配合使用。Line Input #语句从顺序文件中读取一个完整的行，并把它赋给一个字符串变量。本题中依次取出每一行放到InD中，变量中只能保留最后一次取出的行。