VB中

Question

在PHP中我可以有一个数组，其中一个字符串作为索引，一个数组作为值，如下所示：

array(
    '01-01-2016' => array(0,1,2,3,4),
    '01-01-2016' => array(0,1,2,3,4),
    '01-01-2016' => array(0,1,2,3,4),
    '01-01-2016' => array(0,1,2,3,4),
    '01-01-2016' => array(0,1,2,3,4)
);

VB6中是否有等价物？

Answer 1

使用集合，任何其他功能来获取项目密钥（obj.key），你必须自己实现它，扩展集合对象，你必须使用关键字implement实现集合，然后扩展它。 / p>

现在你可以这样做：

Private Sub Command1_Click()
    Dim col As New Collection
    Dim a,b 
    col.Add Array("1", 2, 3, 4), "key1"
    col.Add Array("11", 12, 13, 14), "key2"
    col.Add Array("21", 22, 23, 24), "key3"
    For Each a In col

        For Each b In a
            Debug.Print b;
        Next
        Debug.Print vbCrLf & "-----------"
    Next
End Sub

Answer 2

IMO，Dictionary是比Collection更直接的解决方案。 Collection对象的一个​​限制是，您无法直接获取Collection中值的索引，正如mileyvo所提到的那样。 Dictionary对象没有此限制。字典也更快：见this。此链接还说明了如何访问Dictionary对象中的键。 Here's另一个有用的链接。