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

运行子“test”