数组名称里含有变量

发发哥abc

剑指E 发表于 2024-7-25 14:38
不管什么方法，都是给数组套壳子（即套一个能用字符串或数字序列来索引的外壳）

好像很有道理。我复习一下数组名称的知识。数组名称必须以字母开头，后面可以跟字母或数字，最多可以有255个字符。  字母后边的数字能用变量表示吗？

boy8199

2个数组,一个存名称,一个存数据

剑指E

发发哥abc 发表于 2024-7-25 16:25
好像很有道理。我复习一下数组名称的知识。数组名称必须以字母开头，后面可以跟字母或数字，最多可以有25 ...

字典是最灵活的，而且vba字典的应用网络资源非常丰富

lss001

发发哥abc 发表于 2024-7-25 16:25
好像很有道理。我复习一下数组名称的知识。数组名称必须以字母开头，后面可以跟字母或数字，最多可以有25 ...

'数组名称还是规范化比较方便

'不规范<不带括号>→arr1,arr2,arr3
'注意：代码需要放置在Thisworkbook中
Public arr1, arr2, arr3
Sub 数组名称不规范()
    arr1 = [{1,6}]
    arr2 = [{3,4,5}]
    arr3 = [{7,9}]
    ReDim brr(1 To 3)
    For i = 1 To 3
     brr(i) = CallByName(me, "arr" & i, vbGet)
    Next
End Sub


'规范化<带括号>→arr(1),arr(2),arr(3)
'代码可以放置在模块中
Public arr( 1 To 3)
Sub 数组名称规范化()
    arr(1) = Array(1, 6)
    arr(2) = Array(3, 4, 5)
    arr(3) = Array(7, 9)
    ReDim brr(1 To 3)
    For i = 1 To 3
     brr(i) = arr(i)
    Next
End Sub

发发哥abc

lss001 发表于 2024-7-26 07:39
'数组名称还是规范化比较方便

'不规范→arr1,arr2,arr3

学习了  有点深奥

山海风云轩

学习一下   

ahui885205

dim arr(5,3,4)三维数组，可以添加（自己猜的！）