[填空题] 在窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程: Private Sub Form_Click() O

10 查阅

[填空题] 在窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程:

Private Sub Form_Click()

Open"d:estsmtext1.txt"For Input As # 1

Do While Not______

Line Input # 1,aspects

wholes=wholes+aspects+Chrs(13)+Chrs(10)

Loop

Text1.Text=wholes

______

Open"d:estsmtext2,txt"For Output As # 1

Print # 1,______;

Close # 1

End Sub

运行程序,单击窗体,将把磁盘文件smtext1.txt的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存入磁盘文件smtext2.tXt。请填空。

参考答案:

EOF(A) Close#A TextA,Text或TextA

本题第1个空是判断逻辑值,在VB中使用EOF。第2空是当文件调用后,关闭文件,所以第2空应为Close#1。第3个空是显示输出文件内容,所以应填Text1。

计算机考试