[填空题] 在窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程:
Private Sub Form_Click()
Open "d:Temptext1.txt" For Input As #1
Do While Not______。
Line Input #1,aspectS
whole$=whole$+aspect$+Chr$(13)+Chr$(10)
Loop
Text1.Text=whole$
______。
Open "d:Temptext2.txt" For Output As #1
Print #1,______。
Close #1
End Sub
运行程序,单击窗体,将把磁盘文件Temptext1.txt的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存入磁盘文件Temptext2.txt。请填空。