Excel/VBA 函数中的错误：“需要常量表达式”

Question

我是 VB 的新手，我很难做一些应该非常简单的事情。

我正在尝试创建一个长度为 n+1 的数组，并且在运行以下代码时不断收到“需要常量表达式”

Function binomial(n As Integer, p As Double)
Dim probabilities(0 To n) As Double
End Function

我知道用于构建数组的参数必须是常量，但我是否可以从函数的参数中创建一个？

提前谢谢你

Answer 1

您不能针对可变大小进行 DIM。改为重新调暗

例如

Function binomial(n As Integer, p As Double)
Dim probabilities() As Double
ReDim probabilities(0 To n)
MsgBox LBound(probabilities)
MsgBox UBound(probabilities)
End Function

Sub test()
Call binomial(3, 2)
End Sub

运行子“测试”