[填空題] 下列程序的功能是把文件C:a1.txt復(fù)制成C:a2.txt，請?zhí)羁铡?Private Sub Form C1ick()Dim ch As StringOpen "C:a1.txt" For 【13】 Open "C:a2.txt" For 【14】 Do While Not 【15】 ch＝Input(1,10) Print #20,ch;LoopClose #10,#20 End Sub

[13] Input As # 10

[14] Output As # 20 [15] EOF(10) 根據(jù)程序中的語句Close # 10， #20可知兩個文件的文件號分別為10，20。程序的功能是把文件C:a1.txt復(fù)制成C: a2.txt即最后輸出文件的內(nèi)容為C;a2.txt的內(nèi)容，故a1.txt的打開方式為Input.a2.txt的打開方式為output。根據(jù)語句Print # 20.ch可推斷文件C:a2.txt的文件號為20，另一個為10。再結(jié)合打開語句的格式：Open Path- name For打開方式As[#]文件號可知[13]處應(yīng)填I(lǐng)nput As #10，[14]處應(yīng)為Output As #20。在文件復(fù)制時還得保證復(fù)制文件沒有結(jié)束，此時就用到了EOF函數(shù)。其格式為；EOF(文件號)。因為復(fù)制文件的文件號為10，故[15]處應(yīng)填EOF(10)。