下面是一个带有switch语句的示例函数,但是我很难理解函数如何等于提供的参数?
Function getnumber(value, method) As String
Dim i, j As Integer
Dim rtn As String
j = 0
Select Case method
Case 0:
getnumber = value
Case 1:
rtn = ""
For i = 1 To Len(value)
If IsNumeric(Mid(value, i, 1)) Then
j = j + 1
rtn = rtn & Mid(value, i, 1)
Else
If j > 3 Then Exit For
j = 0
rtn = ""
End If
Next
If rtn = "" Then getnumber = "" Else getnumber = rtn
Case Else:
MsgBox ("Invalid method in getnumber")
End Select
End Function
“getnumber = value”让我很困惑。其中 getnumber 是函数,value是 getnumber 函数的参数
有什么想法吗?
答案 0 :(得分:6)
在VBA中,使用语法YourFunctionName = ValueToReturn
指定函数的返回值。
因此,getnumber = value
只需将value
设置为要从函数返回的值。