[填空題] 在窗體上畫一個命令按鈕和一個文本框,其名稱分別為Command1和Text1,然后編寫如下事件過程:Private Sub Command1_Cli
2021-07-20
[填空題] 在窗體上畫一個命令按鈕和一個文本框,其名稱分別為Command1和Text1,然后編寫如下事件過程:Private Sub Command1_Click()Dim inData As StringText1.Text=""Open"d:myfile.txt" For()As#1Do While()Input #1,inDataText1.Text=Text1.Text+inDataLoopClose#1End Sub程序的功能是,打開D盤根目錄下的文本文件myfile.txt,讀取它的全部內(nèi)容并顯示在文本框中。請?zhí)羁铡?/p>正確答案:
Input;Not EOF(1)
參考解析:[評析] Open語句使用以下語法: Open pathname For [Input|Output|Append] As filenumber [Len=buffersize] 當(dāng)打開順序文件作為Input時,該文件必須已經(jīng)存在,否則會產(chǎn)生一個錯誤。 EOF()函數(shù)判斷文件是否結(jié)束。該程序?qū)χ付窂较碌奈募M行Input操作,由于是遍歷整個文件,則最后的EOF(1)必為真。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。