主题：datamap错在哪里

fill(sql  true)方式形成的SQL TABLE表，

With Tables("窗口产品销售_tbl_records")
   .Fill(sql,"c2",True) 
End With

填加这个怎么没反应呀，错在哪里

Dim dmp As New DataMap
dmp.Add(1,"苹果")
dmp.Add(2,"香蕉")
dmp.Add(3,"波罗")
dmp.Add(4,"桔子")
dmp.Add(5,"桃子")
Tables("窗口产品销售_tbl_records").Cols("rType").DataMap = dmp

无法显示出来DATAMAP呀