vba - 从 VBA 函数返回一个字符串

Question

我正在学习教程并在 hello world 示例函数中遇到编译错误。

这里有什么问题吗？

这是我试过的代码:

Function hi()
    hi = "hello world"
End Function`

编辑:建议的声明没有帮助

编辑:越来越近了。调用“hi()”时括号似乎是个问题

Answer 1

您可以使用 2 种方法来实现您的“Hello World”示例。

选项 1: 使用常规 Sub 简单且足以满足您的示例:

Sub Hi_()

Dim HiStr   As String

HiStr = "Hello World"
MsgBox HiStr

End Sub

---

选项 2:将 Function 与“Hello World”示例结合使用:

Function Hi(TestHi As String) As String

' Input: this function receives a string as a parameter
' Output: returns a string

Hi = "Test Function with " & TestHi

End Function

现在我们需要一个 Sub 来测试 Function:

Sub Test_Hi_Function()

Dim TstHiFunc As String

' send "Hello World" to Function Hi as a parameter
' TstHiFunc gets the returned string result 
TstHiFunc = Hi("Hello World")

' for debug only
MsgBox TstHiFunc

End Sub