下列程序实现的功能是：当在窗体上单击时 把C盘根目录下的文件a1.txt复制到D盘 并取名为 a2.
下列程序实现的功能是：当在窗体上单击时，把C盘根目录下的文件a1.txt复制到D盘，并取名为 a2.txt，请填宁。 Private Sub form_ Click() Dim Ch As String Open "c:/a1. txt, for【 】As 10 Open "d:/a2.txt" for Output As 20 do while【 】 Line Input 10, Ch 【 】 Loop Close 10 Close 20 End Sub
请帮忙给出正确答案和分析，谢谢！
参考解答
410***265
2023-07-22 15:09:38
正确答案：Input Not EOF(10)Print #20Ch
本题进行文件复制的思路如下：首先打开源文件用来读，打开目标文件用于写，然后从源文件中读取一行信息写到目标文件中，再从源文件中读取一行信息再写到目标文件中去……，如此循环直到源文件中的所有行均写到目标文件中。打开源文件用于读，所以第一空处应填“Input”。从源文件中读取信息必须保证能读到信息，故在读之前应测试源文件是否处于文件尾，所以第二空处应填“NotEOF(10)”。从源文件中读取一行信息后，应把这一行信息写到目标文件中，所以第三空处应填“Print#20，Ch”。
相似问题
如下有一段不完整的程序段 如果要求该程序执行3次循环 则在程序中的括号里要填入【 】。 Privat
如下有一段不完整的程序段，如果要求该程序执行3次循环，则在程序中的括号里要填入【 】。 Private Sub Command1_Click() x = 1 do x=x+3 Prin
下面的程序是找出两个正整数a和b 使得a＜b a+ b=99 a和b的最大公约数是3的倍数 并统计满
下面的程序是找出两个正整数a和b，使得a＜b、a+ b=99、a和b的最大公约数是3的倍数，并统计满足条件数对的个数。 Option Explicit Dim a As Intege
表达式'12345'＜＞'12345'&'ABC'的值是______。请帮忙给出正确答案和分析 谢谢
表达式 "12345 "＜＞ "12345 "& "ABC "的值是______。请帮忙给出正确答案和分析，谢谢！
算法的工作量大小和实现算法所需要的存储单元分别称为算法的【 】。请帮忙给出正确答案和分析 谢谢！
算法的工作量大小和实现算法所需要的存储单元分别称为算法的【 】。请帮忙给出正确答案和分析，谢谢！
有下列程序 程序运行后 单击“Command1”按钮 在列表框List1中显示的第一行和第二行的结果
有下列程序，程序运行后，单击“Command1”按钮，在列表框List1中显示的第一行和第二行的结果分别是【 】和【 】，最后一行的结果是【 】。 Type ty
