VB中Dictionary如何使用?

我在工程中加了一个模块，代码如下：Sub tblMapCard()
    Dim TblMap_Card              '创建一个变量
    Set TblMap_Card = CreateObject(Scripting.Dictionary)
        TblMap_Card.Add "Table", "Cards"
        TblMap_Card.Add "Serial", "serialno"
        TblMap_Card.Add "Number", "surface"
End Sub
    
调用时，出错。我做这个的目的是：建立一个表映射关系,以后需要使用表名的地方，我直接调用，TblMap_Card.key("Table")，期对应值也可以根据需要设置。