A-A+
在名称为Form1的窗体上画一个文本框 其名称为Text1 在属性窗口中把该文本框的Muhi
问题详情
在名称为Form1的窗体上画一个文本框，其名称为Text1，在属性窗口中把该文本框的Muhiline属性设置为True，然后编写如下的事件过程： Private Sub Form_Click() Open“d：testsmText1.txt"For lnput As1 Do While Not【 】 Line lnput1，aspect＄ whole＄=wholes+aspect＄+Chr＄(13)+Chr＄(10) Loop Text1.Text=whole＄ Close1 Open“d：testsmtexttxt"For Output As 1 Print 1，【 】 Close1 End Sub 上述程序的功能是，把磁盘文件，mText1.txt的内容读到内存并在文本框中显示出来，然后把该文本框中的内容存入磁盘文件smtexttxt。请填空。
请帮忙给出正确答案和分析，谢谢！
参考答案
正确答案：EOF(1) Text1.Text
EOF()函数返回一个表示文件指针是否到达文件末尾的值。当到文件末尾时，EOF()函数返回True，否则返回FMse。所以[14]为EOF(1)，表示如果没有到达文件1的末尾。Print#1，Text1．Text表示把整个文本框Text1的内容一次性的写入文件。
