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