
两道VBA程序题求解~~
课本上的答案分别是9和36。但是我不明白为什麽是这两个答案啊。帮帮忙,告诉我答案,简单解释一下好吗?万分感谢!! 1.下面VBA程序段运行时,内层循环的循环总次...
课本上的答案分别是9和36。但是我不明白为什麽是这两个答案啊。帮帮忙,告诉我答案,简单解释一下好吗?万分感谢!! 1.下面VBA程序段运行时,内层循环的循环总次数是——?for m=0 to 7 step 3for n=m-1 to m+1next n next m 2.在窗体上添加一个命令按钮(名为command1),然后编写如下事件过程:private sub command1_clickdim b, k for k=1 to 6 b=23+knext kmsgbox b+kend sub打开窗体后,单击命令按钮,消息框的输出结果是——?
展开
2个回答
展开全部
第一个程序的总循环次数是9次
Sub test()
For m = 0 To 7 Step 3 '把0到7以3的间隔依次赋予m,就是说m分别是0, 3, 6,共3个值
For n = m - 1 To m + 1 '把m - 1到m + 1以1的间隔依次赋予n,就是说n分别是m - 1, m + 0, m + 1,共3个值
Next n
Next m
End Sub
总循环次数 = 3 x 3 = 9
第二个程序输出结果是36
Private Sub command1_click()
Dim b, k
For k = 1 To 6
b = 23 + k 'k最大是6,b = 23+6 = 29
Next k
MsgBox b + k '当跳出For循环时k=7(小于7的话不会跳出For循环),即输出是 29+7=36
End Sub
Sub test()
For m = 0 To 7 Step 3 '把0到7以3的间隔依次赋予m,就是说m分别是0, 3, 6,共3个值
For n = m - 1 To m + 1 '把m - 1到m + 1以1的间隔依次赋予n,就是说n分别是m - 1, m + 0, m + 1,共3个值
Next n
Next m
End Sub
总循环次数 = 3 x 3 = 9
第二个程序输出结果是36
Private Sub command1_click()
Dim b, k
For k = 1 To 6
b = 23 + k 'k最大是6,b = 23+6 = 29
Next k
MsgBox b + k '当跳出For循环时k=7(小于7的话不会跳出For循环),即输出是 29+7=36
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询