vb 单击事件没有反应

来源:百度知道 编辑:UC知道 时间:2024/06/17 16:26:48
Private Sub Command1_Click()
Dim x As Integer, i As Integer
x = 2
For i = 2 To x - 1
If x Mod i = 0 Then
Print 1
Else
Print 0
End If
Next

End Sub

看不懂你这段想干什么,不过
x = 2
For i = 2 To x - 1
的话,x-1 = 1,这个for内不会执行就结束了。如果你是想让i从2到1这样倒走的话,改成For i = 2 To x - 1 step -1 倒走时step不能省略

- -
for i=2 to x-1
x=2
i>x-1
就不会执行FOR了
当然没反映

x=2,所以循环For i = 2 To x - 1
不会开始