Arrays VB6动态阵列确定

在VB6中，可以静态和动态声明数组。当数组被动态声明时，是否可以确定该数组是否被声明为动态数组，因此可能需要“redim”才能使用？i、 e.我正在寻找类似于：

if myarray is dynamic then
  redim ...
end if
myarray(x) = y

---

不幸的是，没有内在的东西来判断数组是否是动态的。您可能可以使用有关VB6阵列底层实现的专门知识，如Matt Curland的书中所述，将一些东西组合起来

我认为最好的方法是使用函数。它测试数组是否是需要重新命名的动态数组。

使用此代码

Private Sub Command1_Click()
    Dim A() As Double
    Dim B() As Double
    ReDim B(4)
    If (Not A()) = -1 Then MsgBox "Empty"
    If (Not B()) = -1 Then MsgBox "Empty"
End Sub

（非ArrayName（））如果为空，则返回-1