美好的一天, 这是我的第一篇文章。我是VB .Net的新手,从Stackoverflow.com学到了很多东西
我想将Function返回的值(true / false)用于Form Load事件的If语句。如果函数值为False,则消息框显示“未运行”,否则。
以下是示例代码。我正在使用应用程序供应商提供的API库来构建一个小应用程序。 我还尝试在结束函数之前使用“Return CreateX”和“CreateX()= True”。由于某种原因,即使我的进程正在运行,它也始终只返回一种类型的pf消息。
Public GlobalX As appLib.Api
Public Function CreateX() As Boolean
GlobalX = CreateObject("ABCD")
If GlobalX Is Nothing Then
CreateX = False
Else
CreateX = True
End If
End Function
Private Sub APP_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If CreateX() = False Then
MsgBox(" NOT Running!!")
Else
MsgBox("Running!!")
End If
End Sub
请问你能帮助我做到这一点吗?提前致谢。
答案 0 :(得分:0)
尝试用这个替换你的功能;
Public Function CreateX() As Boolean
GlobalX = CreateObject("ABCD")
If GlobalX Is Nothing Then
return False
Else
return True
End If
End Function
对于该方法,它应该没问题,或者更好的方法来验证boolean;
Private Sub APP_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If NOT CreateX() Then
MsgBox(" NOT Running!!")
Else
MsgBox("Running!!")
End If
End Sub