[填空題] 在窗體上畫(huà)一個(gè)文本框，其名稱為T(mén)ext1，在屬性窗口中把該文本框的MultiLine屬性設(shè)置為T(mén)rue，然后編寫(xiě)如下的事件過(guò)程： Private
[填空題] 在窗體上畫(huà)一個(gè)文本框，其名稱為T(mén)ext1，在屬性窗口中把該文本框的MultiLine屬性設(shè)置為T(mén)rue，然后編寫(xiě)如下的事件過(guò)程：
Private Sub Form_Click()
Open"d:estsmtext1.txt"For Input As # 1
Do While Not______
Line Input # 1,aspects
wholes=wholes+aspects+Chrs(13)+Chrs(10)
Loop
Text1.Text=wholes
______
Open"d:estsmtext2,txt"For Output As # 1
Print # 1，______；
Close # 1
End Sub
運(yùn)行程序，單擊窗體，將把磁盤(pán)文件smtext1.txt的內(nèi)容讀到內(nèi)存并在文本框中顯示出來(lái)，然后把該文本框中的內(nèi)容存入磁盤(pán)文件smtext2.tXt。請(qǐng)?zhí)羁铡?/p>正確答案：
EOF(A) Close#A TextA,Text或TextA
參考解析：本題第1個(gè)空是判斷邏輯值，在VB中使用EOF。第2空是當(dāng)文件調(diào)用后，關(guān)閉文件，所以第2空應(yīng)為Close#1。第3個(gè)空是顯示輸出文件內(nèi)容，所以應(yīng)填Text1。
詞條內(nèi)容僅供參考，如果您需要解決具體問(wèn)題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。