'*****************************函数说明
'Time : 06-03-02
'Developer : yaochuanfu
'Version : 1.1
'Describe : 该模块是为了实现创建Topology,在创建拓扑的时候使用两种方式，一种是将所有
' : 的表合成到一起创建，一种是在原表中创建，这样就是为每一个表单独创建
' : 该模块的接口函数就是Topology(TopologyTableName(),strFilePath,lTopoType)
' : TopologyTableName数组中存放的是需要创建拓扑的表
' : strFilePath创建拓扑的中间数据存放的路径以及最终表存放的路径
' : lTopoType是创建拓扑的方式，是分别创建还是一起创建
'Declare Sub Topology(TopologyTableName() as String,strFilePath as String lTopoType as Logical)
大家可以创建一个工程然后将这个模块编进去通过调用Topology过程就可以创建道路的拓扑关系了
注意只能为折线对象创建拓扑关系