解释VB语句

DimxAsIntegerFori=1To10IfiMod3=0Thenx=x+iEndIfNextiPrintx...

2026年09月26日 07:20

有3个网友回答

网友（1）：

Dim x As Integer '定义变量x
For i = 1 To 10 'for循环1到10，i每次+1
If i Mod 3 = 0 Then '如果i模3为0（如果i能被3整除）
x = x + i 'x=x+i不解释
End If '结束判断
Next i '结束for循环
Print x '在窗体打印出x

网友（2）：

这个计算1到10当中能被3整除的数的和
If i Mod 3 = 0 Then '凡能被3整除的数为条件真（true）
x = x + i
End If

网友（3）：

Dim x As Integer
For i = 1 To 10
If i Mod 3 = 0 Then '如果i能被3整除
x = x + i
End If
Next i
Print x '打印x