[填空題] 在名稱為Form1的窗體上畫一個文本框，其名稱為Text1，在屬性窗口中把該文本框的Muhiline屬性設置為True，然后編寫如下的事件過程： Private Sub Form_Click( ) Open“d：estsmText1.txt"For lnput As#1 Do While Not 【14】 Line lnput#1，aspect＄whole＄=wholes+aspect＄+Chr＄(13)+Chr＄(10) Loop Text1.Text=whole＄ Close#1 Open“d：estsmtext2.txt"For Output As #1 Print #1， 【15】 Close#1 End Sub 上述程序的功能是，把磁盤文件，mText1.txt的內(nèi)容讀到內(nèi)存并在文本框中顯示出來，然后把該文本框中的內(nèi)容存入磁盤文件smtext2.txt。請?zhí)羁铡?/p>正確答案：

[14] EOF(1)

[15]Text1.Text EOF( )函數(shù)返回一個表示文件指針是否到達文件末尾的值。當?shù)轿募┪矔r， EOF( )函數(shù)返回True，否則返回FMse。所以[14]為EOF(1)，表示如果沒有到達文件1的末尾。Print#1，Text1．Text表示把整個文本框Text1的內(nèi)容一次性的寫入文件。