vb6 – 如何在控制数组中找到最大元素索引？

来源：互联网收集：自由互联发布时间：2021-06-24

我正在动态加载和卸载窗体上的命令按钮数组. 我可以做这个： Dim UnloadIndex As Integer For UnloadIndex = 1 To 20 Unload frmMain.cmdAction(UnloadIndex) Next 但我并不总是有20个元素.有没有办法循环每一个

我正在动态加载和卸载窗体上的命令按钮数组.

我可以做这个：

Dim UnloadIndex As Integer
    For UnloadIndex = 1 To 20
        Unload frmMain.cmdAction(UnloadIndex)
    Next

但我并不总是有20个元素.有没有办法循环每一个直到它到达终点？

我知道我可以使用全局变量并跟踪值,但我试图避免这种情况.

有什么建议请…

使用 UBound()返回指定维度的最高可用下标
数组.

Dim UnloadIndex As Integer 
For UnloadIndex = LBound(frmMain.cmdAction) To UBound(frmMain.cmdAction)
    Unload frmMain.cmdAction(UnloadIndex) 
Next

相关文章