Text1.Text = ""

    Open "d:\myfile.txt" For  【14】  As #1

    Do While  【15】  

        Input #1, inData

        Text1.Text = Text1.Text + inData

    Loop

    Close  #1

End Sub

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