在 VBA 中调用子程序

Question

这是我的简化脚本：

    Sub SomeOtherSub(Stattyp As String)
        'Daty and the other variables are defined here

        CatSubProduktAreakum(Stattyp, Daty + UBound(SubCategories) + 2)

    End Sub

    Sub CatSubProduktAreakum(Stattyp As String, starty As Integer)

    'some stuff

    End Sub

CatSubProduktAreakum 的调用被标记为红色作为“语法错误”。我不明白这个错误。这是一个带有两个参数的简单子例程调用。为什么VBA不接受调用？

Answer 1

尝试 -

Call CatSubProduktAreakum(Stattyp, Daty + UBound(SubCategories) + 2)

至于原因，这是来自 MSDN 通过这个问题 - 什么Call关键字在VB6中做什么？

调用过程时不需要使用 Call 关键字。
但是，如果您使用 Call 关键字来调用需要
参数、参数列表必须括在括号内。如果你省略
Call 关键字，您还必须省略两边的括号
参数列表。如果您使用 Call 语法来调用任何内在函数或
用户定义的函数，函数的返回值被丢弃。

Answer 2

对于仍然阅读本文的人，另一个选择是简单地省略括号：

Sub SomeOtherSub(Stattyp As String)
    'Daty and the other variables are defined here

    CatSubProduktAreakum Stattyp, Daty + UBound(SubCategories) + 2

End Sub

Call 关键字在 VBA 中实际上只是为了向后兼容，实际上并不是必需的。

但是如果您决定使用Call 关键字，那么您必须更改语法以适应。

'// With Call
Call Foo(Bar)

'// Without Call
Foo Bar

两者都会做完全相同的事情。

---

话虽这么说，但在某些情况下，可能需要注意不必要地使用括号会导致在您不希望的情况下对事物进行评估（因为括号在 VBA 中就是这样做的），因此考虑到这一点，更好的选择可能是省略 Call 关键字和括号