Dimc(AsVariantDim c As Variantc = Array(4, 5, 3, 7, 2, 9)c = Array(4, 5, 3, 7, 2, 9)Dim c()Dimcc =Array(4, 5, 3, 7, 2, 9)c =Array(4, 5, 3, 7,2, 9)
Dim c() As Variant c = Array(4, 5, 3, 7, 2, 9) Dim c() c = Array(4, 5, 3, 7, 2, 9) Dim c As Variant c = Array(4, 5, 3, 7, 2, 9) Dim c c = Array(4, 5, 3, 7, 2, 9)
(4）数组下标的下界值由Option Base决定，默认是0，上界值由括号内的参数个数决定。DimcAsVariantc = Array(4, 5, 3, 7, 2, 9)c(0) = 4: c(1) = 5: c(2) = 3c(3) = 7: c(4) = 2: c(5) =9OptionBase1DimcAsVariantc =Array(4, 5, 3, 7, 2, 9)c(1) =4: c(2) =5: c(3) =3c(4) = 7: c(5) =2: c(6) = 9
（4） 数组下标的下界值由Option Base决定，默 认是0，上界值由括号内的参数个数决定。 Dim c As Variant c = Array(4, 5, 3, 7, 2, 9) c(0) = 4: c(1) = 5： c(2) = 3 c(3) = 7: c(4) = 2: c(5) = 9 Option Base 1 Dim c As Variant c = Array(4, 5, 3, 7, 2, 9) c(1) = 4：c(2) =5: c(3) =3 c(4) = 7: c(5) =2: c(6) = 9