[填空题] 把一个磁盘文件的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存人另一个磁盘文件，请填空完成程序。在窗体上建立一个文本框，在属性窗口中把该文本框的Muhiline属性设置为True，然后编写如下的事件过程： Private Sub Form_Click( ) Open"d：estsmtext1．txt"For lnput As#1 Text1.Fontsize=14 Text1.FontName=“幼圆” Do While Not EOF(1) 【8

lnput#与Linelnput#句都可以从顺序文件中读人数据。区别在于Input#仅仅读人数据项，后接变量表，读人几项数据就用几个变量来接收。Linelnput#语句用来从顺序文件中读取一个完整的行，并把它赋给一个字符串变量。对于本题，由于要读人一个完整的文件，并使用Do循环将每次读入的数据通过aspect＄接受并最终赋给whole＄变量，故[8]处应填：Linelnput#1，aspect＄。EOF(1)函数测试文件是否被读取完，当Do循环语句执行完毕后，磁盘文件被完全赋给变量whole＄。此时要在文本框中显示，则[9]处应填：whole＄。磁盘文件读入文本框后，便执行写入另一磁盘文件的操作。写入用Print#语句。该语句后接两个常用参数：文件号与表达式。本题中“1”表示文件号，即在上一步中打开读人的文件。[10]处应填表达式，即：Text1.Text。表示把Text1.Text中的内容写入到smtext2.txt中。