在名称为Form1的窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的Muhiline属性设置为True,然后编写如下的事件过程: Private Sub Form_Click( ) Open“d:/test/smText1.txt'For lnput As1 Do While Not【 】 Line lnput1,aspect$ whole$=wholes+aspect$+Chr$(13)+Chr$(10) Loop Text1.Text=whole$ Close1 Open“d:/test/smtexttxt'For Output As 1 Print 1,【 】 Close1 End Sub 上述程序的功能是,把磁盘文件,mText1.txt的内容读到内存并在文本框中显示出来,然后把该文本框中的内容存入磁盘文件smtexttxt。请填空。