下列程序实现的功能是：当在窗体上单击时，把C盘根目录下的文件a1．txt复制到 D盘，并取名为a2,txt。
Private Sub Form_Click()
Dim Ch As String
Open "c：\a1．txt" For 【13】 As #10
Open "d：\a2．txt" For Output As #r20
Do While 【14】
Line Input #10,Ch
【15】
Loop
Close 10
Close 20
End Sub

下列物质间比较的说法正确的是（　　）

A．含有铁的质量分数：生铁＞钢

B．含有氢的质量分数：煤＞石油

C．地壳中元素的质量分数：铝元素＞铁元素

D．铁的质量分数：Fe₂O₃＞FeO