VBA部分:Static lCount as longDim a as stringlCount=lCount+1a= Format( lCount, "0000")赋值部分:a“0000”表示前面自动补〇,补够四位数,依次类推。
dim str as stringdim num1 as integernum1=pfeatureclass.findfield("str")xxx=pfeatureclass.value(num1)
itable接口