注意:此页面搜索的是所有试题
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
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
参考答案