[试题]

( 11 ) 在窗体上画一个命令按钮和一个文本框 , 其名称分别为 Command1 和 Text1 , 然后编写如下事件过程 :

Private Sub Command1_Click()

D.im inData As String

Text1.Text = ""

Open "d:/myfile.txt" For ( 14 ) As #1

D.o While ( 15 )

Input #1, inData

Text1.Text = Text1.Text + inData

Loop

C.lose #1

E.nd Sub

程序的功能是,打开 D 盘根目录下的文本文件 myfile.txt ,读取它的全部内容并显示在文本框中 。 请填空。

参考答案与解析: