首页 > 计算机 > 计算机考试 正文

[填空题] 下列程序实现的功能是:当在窗体上单击时,把C盘根目录下的文件a1.txt复制到 D盘,并取名为a2,txt。 Private Sub Form_Click() Dim Ch As St

时间:2021-07-20 18:03:55 解答: 80 次

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

正确答案:

[13]Input[14]Not EOF(10)[15]Print #20,Ch

参考解析:

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

  • 相关题库

请充值VIP继续使用(未注册用户支付后会自动注册登录)

×

95元 29元

VIP截止日期:2025-01-01 12:26:54

←请使用支付宝扫码支付

95元 29元

VIP截止日期:2025-01-01 12:26:54

←请使用微信扫码支付