Private Sub Command1_Click()
    Dim A(1 To 5) As Integer
    Dim x As Integer
    For i = 1 To 5
     A(i) = i
    Next i
      i = 1
    Do While x < 6
     A(i) = A(i) + x
     x = x + 2
     i = i + 2
    Loop
    Text1.Text = A(3)
    Text2.Text = A(5)
End Sub
程序运行后，单击命令按钮，在两个文本框中显示的值是（    ）。
A、5   9 B、5   4
C、9   5 D、4   5