You have an extra parenthesis that does not belong there
If (UBound(ArrInput_PaymentDate) = 2 And _ ' ***Here is the issue!!!***
ArrInput_PaymentDate(0) > 0 And ArrInput_PaymentDate(0) <= 31 And _
ArrInput_PaymentDate(1) > 0 And ArrInput_PaymentDate(1) <= 12 And _
ArrInput_PaymentDate(2) >= 20 And ArrInput_PaymentDate(2) < 100) Then
ValidPaymentDate = True
End If
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…