vb6.0编程系统怎么使用数组的方式传变量的变量名？怎么得到每个数组的每个变量的变量名？

vb6.0编程系统怎么使用数组的方式传变量的变量名？怎么得到每个数组的每个变量的变量名？用什么函数或者语句可以获取呢？

https://zhidao.baidu.com/question/430782830.html

用结构啊
Option Explicit

Type NameValuePair
    Name            As String
    Value           As Variant
End Type

Sub Main()
    Dim a()         As NameValuePair
    ReDim a(1)
    a(0).Name = "v1":   a(0).Value = 123
    a(1).Name = "v2":   a(1).Value = "abc"
    Call f(a)
End Sub

Sub f(a() As NameValuePair)
    Dim i           As Long

    For i = LBound(a) To UBound(a)
        Debug.Print a(i).Name, TypeName(a(i).Value), a(i).Value
    Next
End Sub

输出
v1 Integer 123
v2 String abc