下列程序的功能是把文件C:\a1.txt复制成C:\a2.txt，请填空。
Private Sub Form C1ick()
Dim ch As String
Open "C:\a1.txt" For 【13】
Open "C:\a2.txt" For 【14】
Do While Not 【15】
ch＝Input(1,10)
Print #20,ch;
Loop
Close #10,#20
End Sub

财政收入增加的根本原因是（）

A.国民经济平稳快速的发展

B.政府制定了合理的财政预算

C.政府加强了税收征管力度

D.人民生活水平的显著提高