主题：编号自动判断的问题（最后一楼的问题望解释！）

项目如下

 

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:内控系统1.rar

 

目前我通过事件编程把闲置的编号存放在 删除备份表里 

引用狐狸爸爸的一段代码

For Each v As String In DataTables("删除备份").GetUniqueValues("", "编号")
    If DataTables("表A").Find("编号 = '" & v & "'") Is Nothing Then
        e.DataRow("编号") = v
        Exit For
    End If
Next

 

 

目前还有2个小问题没解决

 

第一个是 编号与车系之间有一定关系    瑞风 编号是  A开头   ； 瑞鹰是 Y开头   ；同悦是 T开头 ；宾悦是 B开头

 

           项目目前只是实现了增加一行 会在客户档案表 编号列自动引用 删除备份 的编号列的闲置编号

 

第二个是 编号与车牌号之间的关系
           编号 A0-3   苏K-S6530 就代表车牌号尾数为0的 第三个瑞风建档客户
           编号 A1-3   苏K-L5661 就代表车牌号尾数为1的 第三个瑞风建档客户

 

           编号 Y0-1   苏K-33360 就代表车牌号尾数为0的 第一个瑞鹰建档客户
           编号 Y1-1   苏K-35051 就代表车牌号尾数为1的 第一个瑞鹰建档客户

 

 

 

由于我想从输入习惯上严格控制数据的精确性 

 

所以我最终的目的是  打个比方

 

需要录入一个新客户 车牌号是 苏K-3R281的瑞风车 车型号是HC6500A3C7BE3；

 

1.用加载树选择瑞风 然后选择 HC6500A3C7BE3  录入；

 

2.输入车牌号苏K-3R281  此时 客户档案的编号列自动会先匹配 删除备份里 A1开头的闲置号码

         如果有就自动启用并显示在客户档案表 编号里 

         如果没有该号码 就自动判别 当前客户档案里A1开头最后一位建档客户 例如：A1-101是当前A1开头的最后一位建档客户，那新号码就是A1-102 并显示在编号里