Private Sub Command1-Click() Dim b,k For k=1 to 6 b=23+k Nex

问题描述:

Private Sub Command1_Click() Dim b,k For k=1 to 6 b=23+k Next k MsgBox b+k End Sub
是关于计算机二级access的问题、、、
Private Sub Command1_Click()
Dim b,k
For k=1 to 6
b=23+k
Next k
MsgBox b+k
End Sub
1个回答 分类:综合 2014-10-23

问题解答:

我来补答
=23+6=29 (b的运算结果是:第1次是24 第2次是25 每次+1,到K=6时,b=29)
k循环之后,K的值=7
即 b+k=29+7 =36
最后显示的是 36
这个循环实际上是多余的,也是搅人的,一不小心就会掉进陷井
再问: For k=1 to 6 不是K只能从1到6取值循环嘛、怎么取到7去了?不是很理解K!
再答: 循环结束之后,K按照前面的步长STEP自动加一次,这里步长是1了,所以就成了7 为了更好的理解,可以看以下示例: Sub zldccmx() For k = 22 To 2 Step -2 b = k Next Debug.Print b, k End Sub 照理说,K循环到2的时候就结束了,最后B里面存储的是K结束循环前的值,也就是2,但是,习惯性地,K仍会加一次步长(-2),最后K就是0了!
 
 
展开全文阅读
剩余:2000
上一页:合外力做功,