Excel VBA函数=函数参数?
下面是一个带有switch语句的示例函数,但我很难理解函数如何与提供的参数相等Excel VBA函数=函数参数?,excel,vba,Excel,Vba,下面是一个带有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
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函数的参数
有什么想法吗?在VBA中,您可以使用语法YourFunctionName=ValueToReturn指定函数的返回值
因此,getnumber=value只是将value设置为要从函数返回的值。在VBA中,使用语法YourFunctionName=ValueToReturn指定函数的返回值
因此,getnumber=value只是将value设置为要从函数返回的值。getnumber=value是返回值-如果调用getnumbervalue方法,调用代码将收到值。这与您的问题无关,但函数缺少大量变量标注。Dim i,j As Integer应该是Dim i As Integer,j As Integer,value和method也应该被标注,我认为是Variant或String,而Integergetnumber=value是返回值-如果调用getnumbervalue,调用代码将接收值,方法。与你的问题无关,但你的函数缺少很多变量的维数。Dim i,j作为整数应该是Dim i作为整数,j作为整数,值和方法也应该被标注,我认为是变量或字符串和整数