填空题

下列程序实现的功能是：当在窗体上单击时，把C盘根目录下的文件a1.txt复制到D盘，并取名为 a2.txt，请填宁。 Private Sub form_ Click() Dim Ch As String Open "c:\a1. txt, for 【8】 As #10 Open "d:\a2.txt" for Output As #20 do while 【9】 Line Input #10, Ch 【10】 Loop Close 10 Close 20 End Sub