MapX控件实现查询功能.docVIP

  • 1
  • 0
  • 约1.5千字
  • 约 2页
  • 2017-04-30 发布于安徽
  • 举报
MapX控件实现查询功能.doc

?? MapX控件实现查询的功能 ?作者: 不详 ?? 来源: ?? 更新日期:2005-12-12 ?? 阅读次数:1115?应用MapX控件实现查询的功能并不太难。MapX为我们提供了Find、FindFeature等对象,可以用来实现我们需要的功能:) 1、本程序实现从下列表中选择一个节点,并以此节点为中心进行进行定位的功能(实例以第一层RTUName属性的值进行查询) Private Sub Command1_Click() Dim FindObj As MapXLib.Find Dim FoundFeature As FindFeature 从要查询的RTU图层生成Find对象,并为这个对象设置要查询的FindDataSet、FindField属性 Set FindObj = Form1.Map1.Layers.Item(1).Find Set FindObj.FindDataset = Form1.Map1.DataSets(RTU节点 dataset) Set FindObj.FindField = FindObj.FindDataset.Fields(RTUName) Set FoundFeature = FindObj.Search(Combo1.Text) Me.Hide 关掉AutoRedraw???因为Center

文档评论(0)

1亿VIP精品文档

相关文档