VBA函数=函数参数？

Question

下面是一个带有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”真的让我困惑。 Where getnumber是函数和值是getnumber的参数函数

任何想法？

Answer 1

在VBA中，可以使用语法YourFunctionName = ValueToReturn指定函数的返回值。

因此，getnumber = value只是将value设置为要从函数返回的值。