Function AA(info As String) As Boolean
   If info ="1" Then
      AA = False
      Exit Function
   End If
AA=true
End Function
是个子过程主过程中调用
Private Sub Cmd_Click()
    '我想提取AA的返回值
  if(call AA("3")) then '在call AA提示错误
     msgbox "成功"
  else
     msgbox "失败"
  end if
End Sub请高手解答,就是想要子过程的返回值并if判断。