苦思冥想了N多天,还是没想出怎么写这个代码,那位仁兄帮帮忙! 
网上看了下,有说用数据库的,不过我还是想用Ini记录相关信息。

解决方案 »

  1.   

    当然要用数据库来查询换乘,关键是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
      

  2.   

    其实就是设计好表,然后就是SQL语句.我写过,可以查询直达车,转一次,转二次.