下面程序计算并输出的是
Private Sub Command1_Click()
a=10
s=0
Do
s=s+a*a*a
a=a-1
Loop until a＜=0
Print s
End sub

A．Private Sub P1_MouseMove(Button As Integer，Shift As Integer，X As Single，Y As Single) <br>Print X，Y<br> End Sub
B．Private Sub P1_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single)<br>Picture.Print X，Y<br> End Sub
C．Private Sub P1_MouseMove(Button As Integer，Shift As Integer，X As Single，Y As Single)<br>P1.Print X，Y<br> End Sub
D．Private Sub Form_MouseMove(Button As Integer，Shift As Integer，x As Single，Y As Single) <br>P1.Print X，Y<br> End Sub

A．Print gcd(8，12)，gcd(12，16)，gcd(16，8)
B．Print gcd(8，12，16)
C．Print gcd(8)，gcd(12)，gcd(16)
D．Print gcd(8，gcd(12，16))