vba - 在VBA中为多个子程序设置变量等于0

Question

我正在尝试使用集合在每次运行子之前将变量设置为等于 0。我有一堆指标作为单独的子例程，对于每个子例程，我将变量声明为 long，然后将它们全部设置为 0，然后让它们从所需的任何数据中提取。我希望不必每次都将它们设置为 0，而是在开始时将它们设置为相等，这样就不必将其放入每个子例程中，但我不清楚如何要做到这一点。我试过这段代码，但我不知道它是否正确或放在哪里:

Dim myVars As Collection
Set myVars = New Collection
Dim j As Variant
myVars.Add a
myVars.Add b
myVars.Add c
myVars.Add d
myVars.Add e


For j = 1 To myVars.Count
myVars(j) = 0
Next j

Answer 1

如果您将变量声明为数字类型(例如 Long 、 Integer 、 Byte 、 Double 、 Single )，那么它们会被自动赋值为 0。

无论如何，您最好使用强类型变量，这样可以避免使用集合或使变量在范围内成​​为全局变量。