下列程序实现的功能是:当在窗体上单击时,把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

时间:2023-10-01 10:15:51

相似题目