| 编号的生成问题 |
|
| 作者：cg1 文章来源：Access911 点击数： 本日：{$DayHits} 更新时间：2005-2-4 16:53:35 |
|
原文：http://access911.net/71FAB21E13DCE8F3.htm
问题：
|
我跟你说说我这边的情况吧。好像工号03－0756－004－1JF，表示：03表示03年生产，0756是合同号，004表示对方单位的编号，1表示合同的第几项，JF是表示车间。你说这样的工号会不会很烦？ |
回答：
|
我只能说，你在设计数据结构的时候就已经错误了。
很多程序员认为 “编号”是一个字段，在计算机中这的确是正确的，但是，在计算机中，编号是没有含义的，没有语法、没有组合、没有任何意义，仅表示记录的唯一标识。而实际生产中，编号往往包含很多意义（除非你使用数据库查询系统来管理随机编号）。因此就像你说的，编号的每个部分都有含义。所以，应该以每个部分为最小单位来建立数据库结构。简单的说，就是 生产日期、合同号、对方单位编号、车间分几个字段存储，这也可以说是“原子性”扩展。其实 SQL 不仅仅可以查询数据，还可以组织数据，比如
| select 日期 & 合同号 & 单位号 & 车间 as 编号,全名 from 产品表 |
|
问题：
|
但很惨的是：录入员已经习惯很连续地录入03－0456－002－4JF这样的工号了，叫他们分开来录入，恐怕很麻烦。 |
回答：
|
你可以在保存按钮上写点代码切分数据，即使连续窗体也可以在 BEFOREUPDATE事件里面写代码。代码可以类似：
Sub SplitString()
Dim strA() As String
strA() = Split(Me.TextBoxA, "-")
Dim i As Integer
For i = 0 To UBound(strA)
Debug.Print strA(i)
Me("TextBox" & i).value=strA(i)
Next
End Sub | |
|
| 文章录入：tm 责任编辑：tmtony |
|
上一篇文章： 自动编号的字段在删除记录后编号不连续
下一篇文章： 如何建立IP地址库并加以搜索 |
| 【字体：小 大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】 |
用户登录 
新用户注册 
网友评论：（只显示最新10条。评论内容只代表网友观点，与本站立场无关！）
