VB题想要解析
提问:VB题想要解析
Private Sub Form_Click()Dim x As IntegerFor i = 1 To 3For j = 1 To iFor k = j To 3x = x + 1Next kNext jNext iPrint xEnd Sub最后为什么是14?
网友回答:
i=1 j=1 k=1 x=1
i=1 j=1 k=2 x=2
i=1 j=1 k=3 x=3
i=1 j=1 k=1 x=4
i=1 j=1 k=2 x=5
i=1 j=1 k=3 x=6
i=2 j=2 k=2 x=7
i=2 j=2 k=3 x=8
i=3 j=1 k=1 x=9
i=3 j=1 k=2 x=10
i=2 j=2 k=3 x=11
i=3 j=2 k=2 x=12
i=3 j=2 k=3 x=13
i=3 j=3 k=3 x=14
循环过程应该这样