Excel/VB函数出错:"需要常量表达式"

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

运行子"测试"