問題:
如何用代碼在“默認(rèn)值”里實(shí)現(xiàn)自動(dòng)編號?單據(jù)流水號生成問題。
如何用代碼在“默認(rèn)值”里實(shí)現(xiàn)自動(dòng)編號?
如果我想實(shí)現(xiàn)不同類型的自動(dòng)編號,我應(yīng)該怎么設(shè)置代碼呢?
如:第1號、第2號、...........、第198號..................
或:CN0001-A、CN0002-B、CN0003-B、.........、CN0004-A、CN1998-B……
是在默認(rèn)值里輸入代碼呢,還是在什么地方,請指教,謝謝!
回答:
這些要求都不需要在“表”的字段屬性中完成,一般都是在界面編程中解決的。
用 dcount() 或者 DMAX() 函數(shù)取值后用字符串組合的方法得到編號
Private Sub Field1_Enter()
If IsNull(Field1.value) Then
Field1.value = "CN" & Format(CLng(DMax("mid(field1,3,4)", "table1") + 1), "0000") & "-A"
End If
End Sub
當(dāng)然,知道原理以后你一定要用更改表的“默認(rèn)值”的方法來實(shí)現(xiàn)也未嘗不可,但個(gè)人覺得沒必要。
如何用代碼在“默認(rèn)值”里實(shí)現(xiàn)自動(dòng)編號?單據(jù)流水號生成問題。
如何用代碼在“默認(rèn)值”里實(shí)現(xiàn)自動(dòng)編號?
如果我想實(shí)現(xiàn)不同類型的自動(dòng)編號,我應(yīng)該怎么設(shè)置代碼呢?
如:第1號、第2號、...........、第198號..................
或:CN0001-A、CN0002-B、CN0003-B、.........、CN0004-A、CN1998-B……
是在默認(rèn)值里輸入代碼呢,還是在什么地方,請指教,謝謝!
回答:
這些要求都不需要在“表”的字段屬性中完成,一般都是在界面編程中解決的。
用 dcount() 或者 DMAX() 函數(shù)取值后用字符串組合的方法得到編號
Private Sub Field1_Enter()
If IsNull(Field1.value) Then
Field1.value = "CN" & Format(CLng(DMax("mid(field1,3,4)", "table1") + 1), "0000") & "-A"
End If
End Sub
當(dāng)然,知道原理以后你一定要用更改表的“默認(rèn)值”的方法來實(shí)現(xiàn)也未嘗不可,但個(gè)人覺得沒必要。