10.把一个磁盘文件的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入另一个磁盘文件，请填空完成程序。在窗体上建立一个文本框，在属性窗口中把该文本框的MultiLine属性设置为True，Examda提示：然后编写如下的事件过程：
Private Sub Form_Click（）
Open癉：＼ test1.txt”For Input As # 1
Text1.FontSize=14
Text1.FontName=“幼圆”
Do While Not EOF（1）
【13】
whole＄=whole＄+aspect＄+Chr＄（13）+Chr＄（10）
Loop
Text1.Text=【14】
Close
Open“D：＼ test2.txt”For Output As # 1
Print # 1,【15】
Close
End Sub
参考答案
1.【1】重复（或循环）
2.【2】0
3.【3】模块
4.【4】消息
5.【5】谓词演算
6.【6】样式
7.【7】ABCD 【8】VB Programming
8.【9】LBound（x）+1 【10】x（k）=x（k-1）
9.【11】Flag=i 【12】j＜Flag
10.【13】Line Input # 1,aspect＄ 【14】Whole＄ 【15】Text1.text