vba - Visual Basic - 编译错误 : Invalid qualifier

Question

我正在用 Visual Basic 编写自定义 Excel 函数。当我运行函数时，出现错误: Compile error: Invalid qualifier on mondayArray on the line For index = 0 To mondayArray.Length - 1。是什么导致了这个错误？

Function SumHours(monday, tuesday, wednesday, thursday, friday, saturday, sunday)
    Dim mondayHours As Integer

    Dim mondayArray() As String
    Dim splitArray() As String

    SumHours = 0

    If monday <> "/" Then
        mondayArray = Split(monday, " ")

        For index = 0 To mondayArray.Length - 1
            splitArray = Split(mondayArray(index), "-")
        Next

    End If
End Function

Answer 1

.length 不是数组的属性。使用 LBound function和 UBound function确定数组的范围(下边界和上边界)。

        For index = LBound(mondayArray) To UBound(mondayArray)

我相信您混淆了集合中的 .length 属性；例如HtmlElementCollection.