主题：如何实现输入数字显示车号

B表为车辆列表，有100多辆车的车号等信息，我要在A表的车号列中实现输入"1234"，显示"苏EE1234"或者是"苏ED1234"，因为车辆很多，而且经常会增加，如果用列表属性中的代码项目也不方便，我原来在易表中是在B表中增加一个代码列，对应每个车号设置简写的代码，然后在A表中通过findtext函数实现。请问在狐表中应该怎么做才合理？谢谢！

上述的设置我也用了，但是对录入人员来说还是不方便，

像列表项目来自于列实例中，在几百辆车中还要鼠标找到了再选择，

输入助手实例中，也需要鼠标或者“Ctrl + Enter"键选择，

最好是直接输入数字，就出现完整的车号

If e.DataCol.Name = "简码" Then    

    Dim dr As DataRow
    dr = DataTables("车辆").Find("简码 = " & "'" & e.DataRow("简码") & "'" )
    If dr IsNot Nothing 

        e.DataRow("车号")= dr("车号")
        e.DataRow("座位数")= dr("座位数")
            End If
End If