|
阅读：1715回复：2
菜鸟求救！！！mo+vb开发！
<P>Dim objmoRs As MapObjects2.Recordset <BR>Dim objPnt As MapObjects2.Point<BR>Dim objlyr As MapObjects2.MapLayer</P>
<P><BR>Set objPnt = Map1.ToMapPoint(x, y) <BR>For i = 0 To Map1.Layers.Count - 1<BR> Set objlyr = Map1.Layers(i)<BR> Set objmoRs = objlyr.SearchShape(objPnt, moAreaIntersect, "")<BR>Next<BR>以上程序段无法选取点状地物！！！<BR>请高手指教！！！</P> <P><img src="images/post/smile/dvbbs/em02.gif" /><BR></P> |
|
|
1楼#
发布于：2005-11-10 12:49
斑竹可以帮忙一下吗！<img src="images/post/smile/dvbbs/em01.gif" /><img src="images/post/smile/dvbbs/em02.gif" />
|
|
|
2楼#
发布于：2005-11-20 22:36
Set objmoRs = objlyr.SearchShape(objPnt, moAreaIntersect, "")<BR>上面可能有问题
|
|
