mapx模糊查询
来源:互联网 发布:dos下如何打开端口 编辑:程序博客网 时间:2024/06/09 05:08
Dim templayer As Layer, tempFeatures As New MapXLib.Features
Dim TempDataset As MapXLib.Dataset, TempFeature As MapXLib.Feature, TempField As MapXLib.Field
Dim NodX As Node, NodY As Node, NodZ As Node
If Trim(Text1.Text) = "" Then
MsgBox "请输入要查找内容"
Text1.SetFocus
Exit Sub
End If
TreeView2.Nodes.Clear
For Each templayer In Map1.Layers
If templayer.Selectable = True Then
Set TempDataset = Map1.DataSets.Add(miDataSetLayer, templayer)
Set tempFeatures = Map1.Layers.Item(templayer).Search(templayer.KeyField + " like ""%" + Trim(Text1.Text) + "%""")
If tempFeatures.Count > 0 Then
Set NodX = TreeView2.Nodes.Add(, tvwChild, templayer.Name, templayer.Name)
NodX.EnsureVisible
For Each TempFeature In tempFeatures
Set NodY = TreeView2.Nodes.Add(NodX, tvwChild, templayer.Name + "|||" + TempFeature.FeatureKey, TempFeature.Name)
NodY.EnsureVisible
Next
End If
End If
Next
Dim TempDataset As MapXLib.Dataset, TempFeature As MapXLib.Feature, TempField As MapXLib.Field
Dim NodX As Node, NodY As Node, NodZ As Node
If Trim(Text1.Text) = "" Then
MsgBox "请输入要查找内容"
Text1.SetFocus
Exit Sub
End If
TreeView2.Nodes.Clear
For Each templayer In Map1.Layers
If templayer.Selectable = True Then
Set TempDataset = Map1.DataSets.Add(miDataSetLayer, templayer)
Set tempFeatures = Map1.Layers.Item(templayer).Search(templayer.KeyField + " like ""%" + Trim(Text1.Text) + "%""")
If tempFeatures.Count > 0 Then
Set NodX = TreeView2.Nodes.Add(, tvwChild, templayer.Name, templayer.Name)
NodX.EnsureVisible
For Each TempFeature In tempFeatures
Set NodY = TreeView2.Nodes.Add(NodX, tvwChild, templayer.Name + "|||" + TempFeature.FeatureKey, TempFeature.Name)
NodY.EnsureVisible
Next
End If
End If
Next
- mapx模糊查询
- mapx实现查询
- MapX中高效查询方法
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- 模糊查询
- GetClassName
- MapInfo教程--二次开发入门
- 关于女人……
- oracle(1) sql语句1
- 数据文件结构分析——第二部分
- mapx模糊查询
- 数据文件结构分析——第三部分
- 使用dmalloc&valgrind检测内存泄露
- 一个整数,它加上100后是一个完全平方数,再加上168又是一个完全平方数,请问该数是多少?
- cakephp学习之Model(2)---------find函数
- VB+MapX编程实现地图数据查询
- 常用的Dos命令(转载)
- lstrcmp Function
- 数据文件结构分析——第四部分