下列程序的功能是把文件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．观察宫缩对胎心率的影响

E．观察胎动后胎心增速的情况