Private Sub Command1_Click()
    Static Sum As Integer
    Dim I As Integer
    I = 1
    Do
      Sum = Sum + I
      I = I + 1
    Loop While I <= 5
    Text1.Text = Sum
    Text2.Text = I
End Sub
程序运行后，两次单击Command1按纽后，文本框Text1、Text2上的输出结果是（    ）。
A、10  5 B、15  6
C、25  5 D、30  6