一个错误!!!
Dim lyr As MapXLib.Layer
Dim ds As MapXLib.Dataset
Set lyr = Form1.Map1.Layers(1)
Set ds = Form1.Map1.DataSets.Add(miDataSetLayer, lyr)
For i = 1To ds.RowCount
Print ds.Rowvalues(j).Item(5).Field, ds.value(i, 5)
Next i
这样做当ds.value(i,5)的值为空时,就会出现错误,为什么呢?怎么解决?
好象测试它为空值后还会产生内部错误,为什么?