求类似公交换乘算法!
苦思冥想了N多天,还是没想出怎么写这个代码,那位仁兄帮帮忙!
网上看了下,有说用数据库的,不过我还是想用Ini记录相关信息。
[解决办法]
当然要用数据库来查询换乘,关键是sql语句怎么写,如
select s.线路名 from 表 s inner join 站点 t on (s.线路号=t.线路号 and t.站点= ?)
举个例子,下面看lz能看懂吗
Dim cn As new ADODB.Connection,sql$,i%
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\aa.mdb;..."
sql="select s.线路名 from 表 s inner join 站点 t on (s.线路号=t.线路号 and t.站点= ?)"
rs.Open sql, cn, adOpenKeyset, adLockOptimistic
For i = 0 To rs.RecordCount - 1
debug.print rs!线路名
rs.MoveNext
Next
[解决办法]
其实就是设计好表,然后就是SQL语句.
我写过,可以查询直达车,转一次,转二次.