可以運行得到...但第二個IF會執行很多次

不会呀 把IF 放到里面只输出一次 因为当i>100的时候 是不输出的 如果在i>100情况下 就有出现不等于1的 就直接结束For循环了

[此贴子已经被作者于2007-1-21 20:05:18编辑过]

i不會大於100

for i=0 to 99
if command1(i).caption <> "1" then exit for
next i
if i=100 then print "A"

大哥我同是到99,你要到100的话,你把它改成:
for i=0 to 100
if command1(i).caption <> "1" then exit for
next i
if i=101 then print "A"

你看这可不可以得到你要的效果

你那个不是说你输出了多少次,而是说要判断很多次,效率不好

真的不行哦 一定要把NEXT I放到 IF 下面

别那么拿多 那8个来做实验
Dim i As Integer

Private Sub Command2_Click()
For i = 0 To 7
If Command1(i).Caption <> "1" Then Exit For

If i = 7 Then Print "A"
Next i
End Sub

如果全部等于1可以 输出A

Dim i As Integer

Private Sub Command2_Click()
For i = 0 To 7
If Command1(i).Caption <> "1" Then Exit For
Next i

If i = 7 Then Print "A"
End Sub

放上去者不行

我用四个试了一下,可以啊

If i = 8 Then Print "A"

[此贴子已经被作者于2007-1-21 20:25:32编辑过]

我用8个试了一下 不行呀 我发源文件发上来

for i=0 to 100
if command1(i).caption <> "1" then exit for
next i
if i=101 then print "A"
看24楼