对象变量或with块变量未设置

在开发GIS系统时遇到的小问题，向大家请教，代码如下： 
Private Sub Command1_Click()
 Dim MyData(5 To 10, 2 To 4) As Variable

 '填充数据
 
 MyData(5, 2) = "ny"   （运行直此黄色高亮显示）
 MyData(6, 2) = "ny"
 MyData(7, 2) = "ca"
 MyData(8, 2) = "tx"
 MyData(9, 2) = "nc"
 MyData(10, 2) = "sc"
 MyData(5, 3) = "100"
 MyData(6, 3) = "300"
 MyData(7, 3) = "123"
 MyData(8, 3) = "345"
 MyData(9, 3) = "455"
 MyData(10, 3) = "1231"
 MyData(5, 4) = "10000"
 MyData(6, 4) = "2000000"
 MyData(7, 4) = "30000"
 MyData(8, 4) = "12300"
 MyData(9, 4) = "34500"
 MyData(10, 4) = "45500"
 '加入一数据集
 Map1.Datasets.Add miDataSetSafeArray, MyData
 '创建默认的专题地图
 Map1.Datasets(1).Themes.Add
End Sub

Private Sub Form_Resize()
 Map1.Move Map1.Left, Map1.Top, ScaleWidth - Map1.Left, ScaleHeight - Map1.Top
End Sub
运行时总提示“对象变量或with块变量未设置”，不知道是什么问题，请各位大虾指点下~

--------------------编程问答-------------------- 如果Variable是个对象的话，Dim MyData(5 To 10, 2 To 4) As Variable 
改成Dim MyData(5 To 10, 2 To 4) As new Variable 
--------------------编程问答-------------------- 对象末定义或者末引用. --------------------编程问答-------------------- 误写? Variable→Variant??? --------------------编程问答-------------------- Dim MyData(5 To 10, 2 To 4) As Variant
试试看 --------------------编程问答-------------------- 不如这样：

Dim MyData(5 To 10, 2 To 4) As String --------------------编程问答-------------------- Map1.Datasets.Add miDataSetSafeArray, MyData
如果这里可以用string类型，建议采用of123的方法 --------------------编程问答-------------------- VB有variable类型吗？应该是variant吧

补充：VB ,  控件