[填空題] 下列程序?qū)崿F(xiàn)的功能是：當(dāng)在窗體上單擊時(shí)，把C盤根目錄下的文件a1.txt復(fù)制到D盤，并取名為 a2.txt，請?zhí)顚?。Private Sub form
2021-07-20
[填空題] 下列程序?qū)崿F(xiàn)的功能是：當(dāng)在窗體上單擊時(shí)，把C盤根目錄下的文件a1.txt復(fù)制到D盤，并取名為 a2.txt，請?zhí)顚帯?/p>
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
正確答案：[8]Input[9] Not EOF(10)[10]Print #20，Ch
參考解析：本題進(jìn)行文件復(fù)制的思路如下：首先打開源文件用來讀，打開目標(biāo)文件用于寫，然后從源文件中讀取一行信息寫到目標(biāo)文件中，再從源文件中讀取一行信息再寫到目標(biāo)文件中去……，如此循環(huán)直到源文件中的所有行均寫到目標(biāo)文件中。打開源文件用于讀，所以第一空處應(yīng)填“Input”。從源文件中讀取信息必須保證能讀到信息，故在讀之前應(yīng)測試源文件是否處于文件尾，所以第二空處應(yīng)填“Not EOF(10)”。從源文件中讀取一行信息后，應(yīng)把這一行信息寫到目標(biāo)文件中，所以第三空處應(yīng)填“Print #20，Ch”。
詞條內(nèi)容僅供參考，如果您需要解決具體問題
（尤其在法律、醫(yī)學(xué)等領(lǐng)域），建議您咨詢相關(guān)領(lǐng)域?qū)I(yè)人士。