[填空題] 下列程序?qū)崿F(xiàn)的功能是:當(dāng)在窗體上單擊時(shí),把C盤根目錄下的文件a1.txt,復(fù)制到 D盤,并取名為a2.txt。 Private Sub Form_
2021-07-20
[填空題] 下列程序?qū)崿F(xiàn)的功能是:當(dāng)在窗體上單擊時(shí),把C盤根目錄下的文件a1.txt,復(fù)制到 D盤,并取名為a2.txt。
Private Sub Form_Click()
Dim Ch As String
Open "c:a1.txt" For 【8】 As #10
Open "d:a2.txt" For Output As #20
Do While 【9】
Line Input #10, Ch
【10】
Loop
Close #10
Close #20
End Sub
正確答案:Input Not EOF(10) Print #20
參考解析:本題進(jìn)行文件復(fù)制的思路是,首先打開源文件用于讀,打開目標(biāo)文件用于寫,然后從源文件中讀取一行信息寫到目錄文件中,在從源文件中讀取一行信息寫到目標(biāo)文件中,如此循環(huán),直到源文件中的所有行均寫到目標(biāo)文件中。打開源文件用于讀,所以【13】處應(yīng)填寫“Input”。從源文件中讀取信息必須保證能讀到信息,故在讀之前應(yīng)測(cè)試源文件是否處于文件尾,所以【14】處應(yīng)填寫“Not EOF(10)”。從源文件讀取一行信息后,應(yīng)把這一行信息寫到目標(biāo)文件中,所以【15】處應(yīng)填“Print #20”。
詞條內(nèi)容僅供參考,如果您需要解決具體問題
(尤其在法律、醫(yī)學(xué)等領(lǐng)域),建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。