vb 如何循环

来源:百度知道 编辑:UC知道 时间:2024/05/25 11:28:03
for循环怎么可以只循环奇数或偶数?比如1到10只循环1,3,5,7,9?

可以加step步进参数

for i = 1 to 10 step 2
print i
next

打个比方:

Private Sub Command1_Click()
For i = -12 To 100
If i Mod 2 = 0 Then
Print i & " 偶数"
Else
Print i & " 奇数"
End If
Next i
End Sub

Private Sub Command1_Click()
Me.Cls '清除窗体绘画
Print "奇数循环"
For I = 1 To 10 Step 2
Print I
Next

Print "偶数循环"
For I = 2 To 10 Step 2
Print I
Next
End Sub