为什么布尔函数即使在成功执行后也会返回false？

Question

我在Module1中有一个布尔函数“Test”，例如：

Function Test() As Boolean
MsgBox "Testing"
End Function

现在即使成功执行它，我收到一个错误。那是为什么？

If Module1.Test = True Then
MsgBox "True"
ElseIf Module1.Test = False Then
MsgBox "False"
End If

提前致谢

Answer 1

如果您没有明确指定其他内容，False是默认返回值，则它将始终返回False。

要更改它，您需要在函数中的适当位置放置这些语句：

Test = False

Test = True