Private Sub Command1_Click() s = 0 Do s = (s + 1) * (s + 2)
来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/09/20 23:22:16
Private Sub Command1_Click() s = 0 Do s = (s + 1) * (s + 2) Number = Number + 1 Loop Until s >= 30 P
Private Sub Command1_Click()
s = 0
Do
s = (s + 1) * (s + 2)
Number = Number + 1
Loop Until s >= 30
Print Number,s
End Sub
这个程序是怎么执行的?
Private Sub Command1_Click()
s = 0
Do
s = (s + 1) * (s + 2)
Number = Number + 1
Loop Until s >= 30
Print Number,s
End Sub
这个程序是怎么执行的?
从S=0时开始,
当S=0时,执行s = (s + 1) * (s + 2),则S=1*2=2
当S=2时,执行s = (s + 1) * (s + 2),则S=3*4=12
当S=12时,执行s = (s + 1) * (s + 2),则S=13*14=182
Number = Number + 1
执行三次
Number =3
也就是结果为3 182
当S=0时,执行s = (s + 1) * (s + 2),则S=1*2=2
当S=2时,执行s = (s + 1) * (s + 2),则S=3*4=12
当S=12时,执行s = (s + 1) * (s + 2),则S=13*14=182
Number = Number + 1
执行三次
Number =3
也就是结果为3 182
Private Sub Command1_Click() s = 0 Do s = (s + 1) * (s + 2)
private sub command1_click() i=0 do s=s+i i=i+1 loop until i
SOS!Private Sub Command1_Click()/s=0/For j=1 To 20/If j Mod
private sub command1_click( ) dim a a=array(1,2,3,4) j=1:s=0
下列代码的运行结果是什么?Private sub command1_click() s=0 n=100 for i=1
b求π为啥是错的Private Sub Command1_Click()Dim s As Integer,n As Do
Private Sub Command1_Click() Dim i As Integer,s As Integer,n
一道VB题Private Sub Commad ClickPrint "s=";s(5)End SubPrivate F
1)private sub command1_click() x=10:y=0 for i=1 to 5 do x=x-
Private Sub Command1_Click() n = 0 For i = 1 To 3 For j = -4
Private Sub Command1_Click() x=0 n=InputBox("") For i=1 To n
Private Sub Command1_Click() For i = 1 To 4 x = 4 For j = 1