如何从函数返回结果?
例如:
Public Function test() As Integer
return 1
End Function
Run Code Online (Sandbox Code Playgroud)
这给出了编译错误.
如何让这个函数返回一个整数?
我正在尝试编写一个简单的函数,根据我传递的参数,我需要返回一个字符串值.我收到错误编译错误:语法错误.
Public Function getServer(env As String) As String
Dim serverName As String
Select Case env
Case "DEV"
serverName = "abc"
Return serverName;
Case "TEST"
serverName = "def"
Return serverName;
Case "Prod"
serverName = "xyz"
Return serverName;
End Select
End Function
Run Code Online (Sandbox Code Playgroud)