zhangzheng_1979
路人甲
路人甲
  • 注册日期2003-08-13
  • 发帖数60
  • QQ
  • 铜币239枚
  • 威望0点
  • 贡献值0点
  • 银元0个
阅读:1938回复:2

关于查找的问题

楼主#
更多 发布于:2003-08-25 09:54

如何实现查找到含有某个字段的图元并让该图元居中、闪烁? 我的代码是这样的,
Dim FindObject As MapXLib.FindFeature
Dim strSearch As String

strSearch = "Name like ""%" & Text1.Text & "%"""
Map1.Datasets.Add miDataSetLayer, Map1.Layers.Item("cnty")

Set FindObject = Map1.Layers.Item("cnty").Search(strSearch)
If (FindObject.FindRC Mod 10 = 1) Then

  Map1.ZoomTo 0.0003, FindObject.CenterX, FindObject.CenterY
 
  Else
    MsgBox ("找不到!")

End If
但在Set FindObject = Map1.Layers.Item("cnty").Search(strSearch)这一句说类型不匹配?

请高手指点迷津!!!
<img src="images/post/smile/dvbbs/em12.gif" />
喜欢0 评分0
互相学习,共同进步! qq: 8836099
zhangzheng_1979
路人甲
路人甲
  • 注册日期2003-08-13
  • 发帖数60
  • QQ
  • 铜币239枚
  • 威望0点
  • 贡献值0点
  • 银元0个
1楼#
发布于:2003-08-26 09:09
没人知道么?
没有人遇到过么?
互相学习,共同进步! qq: 8836099
举报 回复(0) 喜欢(0)     评分
zhangzheng_1979
路人甲
路人甲
  • 注册日期2003-08-13
  • 发帖数60
  • QQ
  • 铜币239枚
  • 威望0点
  • 贡献值0点
  • 银元0个
2楼#
发布于:2003-08-28 14:37
搞定了!
是定义类型的原因!
互相学习,共同进步! qq: 8836099
举报 回复(0) 喜欢(0)     评分
游客

返回顶部