当前位置:IT认证>BASIC题库

问题:[填空题]

[填空题] 下列程序实现的功能是:当在窗体上单击时,把C盘根目录下的文件a1.txt,复制到 D盘,并取名为a2.txt。 Private Sub Form_Click()Dim Ch As StringOpen "c:a1.txt" For 【8】 As #10Open "d:a2.txt" For Output As #20Do While 【9】 Line Input #10, Ch 【10】 LoopClose #10Close #20 End Su

  

参考答案:

InputNotEOF(10)Print#20

  参考解析

本题进行文件复制的思路是,首先打开源文件用于读,打开目标文件用于写,然后从源文件中读取一行信息写到目录文件中,在从源文件中读取一行信息写到目标文件中,如此循环,直到源文件中的所有行均写到目标文件中。打开源文件用于读,所以【13】处应填写“Input”。从源文件中读取信息必须保证能读到信息,故在读之前应测试源文件是否处于文件尾,所以【14】处应填写“NotEOF(10)”。从源文件读取一行信息后,应把这一行信息写到目标文件中,所以【15】处应填“Print#20”。

微信端