Private Sub Form

网友回答

Dim x,i,j '定义三个变量
x = 0 'x初始化
For i = 0 To 1
'外循环两次x = x + 1 'x+2
For j = 0 To 3
'0~3共4次 2*4=8次If Not (j Mod 2) Then x = x + 1
'只有当not(-1)才不x+1,本题目不可能j mod 2=-1,所以循环8次,x+8
Next jNext iPrint x=; x
'x=10