主题：求助，输入车次后如何输入对应车次的车站名

表a_DataColChanged

If e.DataCol.Name = "车次" Then 

    Dim dr As DataRow

    dr = DataTables("车次表").Find("车次 = " & "'" & e.DataRow("车次") & "'" )

    If dr IsNot Nothing 

        e.DataRow("终到站")= dr("终到站")

    End If

End If

好好看看帮助吧