阅读:2191回复:2
请教!! mapx属性数据的修改问题
<P>在mapx中怎么添加图原的属性数据???</P>
<P><BR> Dim ftrUnderPoint As mapxlib.Features<BR> Dim t As String<BR> Dim srclyr As mapxlib.layer<BR> Dim ptsrc As New mapxlib.Point<BR> Dim ftr As mapxlib.Feature<BR> <BR> t = InputBox("输入名称")<BR> ptsrc.Set X1, Y1<BR> <BR> Set srclyr = g_map.Layers.Item(1)<BR> '找到该点<BR> Set ftrUnderPoint = srclyr.SearchAtPoint(pt)<BR> '找到指定字段<BR> srclyr.KeyField = "name"<BR> <BR> Debug.Print t<BR> For Each ftr In ftrUnderPoint<BR> ftr.KeyValue = t<BR> ftr.Update<BR> Next</P> <P> 这段代码有什么问题,为什么添加不上,但是又不报错!!!</P> |
|
1楼#
发布于:2006-09-22 02:57
同样问题,期待ing~~
|
|
2楼#
发布于:2006-09-12 11:14
<img src="images/post/smile/dvbbs/em01.gif" /><img src="images/post/smile/dvbbs/em01.gif" /><img src="images/post/smile/dvbbs/em01.gif" />
|
|