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

![[填空题] 在窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程: Private Sub Form_Click() Op [填空题] 在窗体上画一个文本框,其名称为Text1,在属性窗口中把该文本框的MultiLine属性设置为True,然后编写如下的事件过程: Private Sub Form_Click() Op](http://www.mshxw.com/aiimages/31/256189.png)
