[填空題] 下面的程序執(zhí)行時(shí)，將把當(dāng)前目錄上的順序文件smtext1.txt的內(nèi)容讀入內(nèi)存，并在文本框Text1中顯示出來。請(qǐng)?zhí)羁铡? Private Sub
2021-07-20
[填空題] 下面的程序執(zhí)行時(shí)，將把當(dāng)前目錄上的順序文件smtext1.txt的內(nèi)容讀入內(nèi)存，并在文本框Text1中顯示出來。請(qǐng)?zhí)羁铡?/p>
Private Sub Command1_Click()
Dim inData As String
Text1.Text=""
Open ".smtext1.txt"______As#1
Do While______
Input #1,inData
Text1.Text=Text1.Text & inData
Loop
Close #1
End Sub
正確答案：Input；(Not EOF(1))
參考解析：本題考查文件的操作。程序首先要以讀文件的方式(Input)打開文件，題中說明這是個(gè)順序文件，那么如果文件指針沒有到文件尾(EOF(1)的值為False)，就要從文件中讀出數(shù)據(jù)，所以循環(huán)條件應(yīng)以是否到文件尾為依據(jù)，判斷是否繼續(xù)循環(huán)。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。