作者：mozzartgauss
发表时间：2008-5-8 16:43:25

我在VB基础上用MO组件技术编一了个小程序,在编写过程中,却不会用searchexpression语句.具体情况是这样的-----我在图层框中添加roadpole层(点层),并且这些路灯杆有ARCVIEW当中已经采集好属性.我在程序中用searchexpression,希望根据输入属性数据,返回空间位置并加亮显示,可是却总是不成功,现在我将我的程序列出来,希望大家能够给指点一下.

程序如下:

  dim cc as new mapobjects2.recordset                          

   dim cc1 as new mapobjects2.recordset

   set cc=map1.layers("'roadpole").recordset

set cc1=map1.layers("roadpole").searchexpression(cc("路灯编号")=text1.text)      '建立了一个文本框,返回用户输入文本,

   if cc1 is nothing then

     msgbox "not find anything"

    else

        set pt=cc1("shape").value

       map1.flashshape pt.sym

   endif

    希望大家帮帮忙碌

［此帖子已被 mozzartgauss 在 2008-5-9 13:11:18 编辑过］

作者：houh
发表时间：2008-7-11 16:33:27

如果是文本查询,要加单引号

发表您的观点，进入该主题参与讨论...