退出Function语句示例

Exit function
     Function ff()
     Dim x As Integer
        For x = 1 To 100
          If x = 5 Then
            Exit Function
          End If
         Next x
      ff = 100
     End Function