说明: vb+mapinfo 实现最短路 'NoNode1 起始点编码 'NoNode2 结束点编码 'nNode 为网中最大的节点数 'NoNode(i) 节点编码 'LinkN(i) 与i点相连Line个数 'LinkNi(i) 与i点相连Line端点存放序号 'iLL=LinkNi(LL) - i + 1 'LinkNo(iLL) 与i点相连Line端点顺序编号 'LinkList(iLL) 与i点相连Line端点距离 'nNodeShortPath 最短路径节点数 'NodeShortPath
<guodegeng> 上传 | 大小:176kb