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

时间:2024-05-30 15:57:40

相似题目