这样好点吧:
For i = 0 To a
match = False
For j = 0 To b
If f(i,j)=true Then
match = True
Exit For
End If
Next
If match = False Then
执行操作1
End If
执行操作2
Next
For i = 0 To a
match = False
For j = 0 To b
If f(i,j)=true Then
match = True
Exit For
End If
Next
If match = False Then
执行操作1
End If
执行操作2
Next
For j = 0 To b
If f(i,j)=true Then
match = True
Exit For
Else
match = False
End If
Next
iIf (match = False,执行操作1,执行操作2)
Next
match = False
For j = 0 To b
If f(i,j)=true Then
match = True
Exit For
End If
Next
IIf (match = False,执行操作1,执行操作2)
Next