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

[填空题] 在窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的MultiLine属性设置为True，然后

编写如下的事件过程：

Private sub Form_Click()

Open"d:＼test＼smtext1.txt"For Input As #1

Do While Not [13]

Line Input #1，aspect $

whole$=whole$+aspect$+Chr$(13)+Chr$(10)

Loop

Text1.Text=whole$

[14]

Open"d:＼test＼smtext2.txt"For Output As #1

Print #1， [15]

Close #1

End sub

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