单项选择题
有如下程序代码: Private Sub Form Click() Dim x As Integer,y As Integer,Bum As Integer x=3 y=x Do Until x>=6 nun=x*y Print“Bum=”:Bum x=x+y y=y+x LoopEnd Sub下列程序代码仅修改了循环语句,循环体未变,其中运行结果不变的是( )。
A.Private Sub Form—Click() Dim x As Integer,y As Integer,Bum As Integer x=3 y=x Do While x<6 Bum=x*y Print“num=”:num x=x+y y=y+x Loop End Sub
B.Private Sub Form_Click() Dim X As Integer,y As Integer,Bum As Integer x=3 y=x Do Until x>6 num=x*y Print“hum=”:hum x=x+y y=y+x Loop End Sub
C.Private Sub Form_Click() Dim x As Integer,y As Integer,num As Integer x=3 y=x Do While x<=6 num=x*y Print“Bum=”:Bum x=x+y y=y+x Loop End Sub
D.Private Sub Form—Click() Dim X As Integer,y As Integer,aura As Integer x=3 y=x Do While x>=6 num=x*y Print“Bum=”;Bum x=x+y y=y+x Loop End Sub