private sub command1_click() i=0 do s=s+i i=i+1 loop until i
来源:学生作业帮 编辑:搜狗做题网作业帮 分类:综合作业 时间:2024/07/02 16:23:43
private sub command1_click() i=0 do s=s+i i=i+1 loop until i>=4s end sub
private sub command1_click()
i=0
do
s=s+i
i=i+1
loop until i>=4s
end sub
程序执行s 的值是?
(答案是32,)
private sub command1_click()
i=0
do
s=s+i
i=i+1
loop until i>=4s
end sub
程序执行s 的值是?
(答案是32,)
![private sub command1_click() i=0 do s=s+i i=i+1 loop until i](/uploads/image/z/8230225-49-5.jpg?t=private+sub+command1_click%28%29+i%3D0+do+s%3Ds%2Bi+i%3Di%2B1+loop+until+i)
loop until i>=4s这一行代码不能执行,请更正..我有下面的代码测试:Private Sub command1_click()i = 0Dos = s + ii = i + 1List1.AddItem sList2.AddItem iLoop Until i >= 4End Sub
再问: 题目上是写着4s,可是怎么解题呀???我想知道怎么得到32的?
![](http://img.wesiedu.com/upload/5/9a/59a37f4484a3c125553a933a700dd8a2.jpg)
再问: 题目上是写着4s,可是怎么解题呀???我想知道怎么得到32的?
private sub command1_click() i=0 do s=s+i i=i+1 loop until i
下列代码的运行结果是什么?Private sub command1_click() s=0 n=100 for i=1
Private Sub Command1_Click() For i = 1 To 3 For j = i To 1 a
Private Sub Command1_Click() For i = 1 To 3 For j = 1 To i F
1)private sub command1_click() x=10:y=0 for i=1 to 5 do x=x-
S=0 i=1 sum=0 DO s=s+i i=i+1 sum=sum+s LOOP UNTIL i≥100 PRIN
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
Private Sub Command1_Click() Dim i,j As Integer For i = 3 To
Private Sub Command1_Click() s = 0 Do s = (s + 1) * (s + 2)
Private Sub Command1_Click() Dim i As Integer,s As Integer,n