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判断。
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判断。
Function AA(info As String) As Boolean
If info ="1" Then
AA = False
Else
AA=true
End If
End Function主过程:
if(AA("3")) then
最好先声明变量=AA("3")
然后再判断