关于图元查询代码的问题，请高手指教，谢谢！！

我是想在“立交桥”这个图层中查找text控件中输入的立交桥的名称，下面是我写的代码，总是报错，查找失败，请各位大侠指教，小弟不胜感激！
Private Sub Command1_Click()
Dim lyr As MapXLib.Layer
Dim ds As MapXLib.Dataset
Dim findftr As MapXLib.FindFeature

Set lyr = mainForm.Map1.Layers("立交桥")
Set ds = mainForm.Map1.DataSets.Add(miDataSetLayer, lyr)
Set lyr.Find.FindDataset = ds
Set lyr.Find.FindField = ds.Fields("名称")
Set findftr = lyr.Find.Search(Text1.Text)    ' 这一行总是报错，查找失败
If (findftr.FindRC Mod 10 = 1) Then

lyr.Selection.Replace findftr
mainform1.Map1.ZoomTo 5, findftr.CenterX, findftr.CenterY
End If

End Sub

<P>你可以使用如下方法</P><P>Set ftrs = layername.Search("字段名称 = " ; text1.text)</P><P>这样做自定义程度高其中"="可换成><like等</P><P>而且还可以使用空间查询,为什么不用呢,呵呵
</P>

<P>不知道你的是怎么回事,我的是好的,因为你加的是图层数据,我想可能是索引的问题,</P><P>你最好在你要搜索的字段上加索引</P>