这样好点吧:
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

解决方案 »

  1.   

    For i = 0 To a
      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
      

  2.   

    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
      IIf (match = False,执行操作1,执行操作2)
    Next