longkd_bvct@yahoo.com.vn > 19-12-19, 04:40 PM
cpucloi > 19-12-19, 05:14 PM
tranthanhan1962 > 19-12-19, 09:51 PM
(19-12-19, 04:40 PM)longkd_bvct@yahoo.com.vn Đã viết: Chào mọi người ạ.Autonumber là bộ đếm kiểu số (số tự nhiên) của trường số access thường dùng trong field ID, nó có 2 dạng tạo số mới tự động cho record 1là tăng dần (Increment) [luôn bắt đầu từ 1] và ngẫu nhiên (Random) [là một số tự nhiên gồm 10 chữ số, access sẽ tạo ra một số tào lao nào đó miễn là không trùng với số đã có], nên chắc chắn sẽ không xử lý kiểu của bạn được
Giờ em muốn tạo Khóa chính dạng Autonumber có kiểu YYYYMMDD và Autonumber gồm 4 số thì làm sao ạ.
Ví dụ: 201912190001 (năm 2019 tháng 12 ngày 19 và thứ tự là 0001)
Xuân Thanh > 19-12-19, 10:07 PM
(19-12-19, 04:40 PM)longkd_bvct@yahoo.com.vn Đã viết: Chào mọi người ạ.
Giờ em muốn tạo Khóa chính dạng Autonumber có kiểu YYYYMMDD và Autonumber gồm 4 số thì làm sao ạ.
Ví dụ: 201912190001 (năm 2019 tháng 12 ngày 19 và thứ tự là 0001)
Private Sub txtSoCT_AfterUpdate()
txtSoCT = Right("000" & txtSoCT, 4)
End Sub
Private Sub txtNgay_AfterUpdate()
If Not IsNull(txtNgay) And Not IsNull(txtSo) Then
txtKhoaChinh = Year(txtNgay) & Right("0" & Month(txtNgay), 2) & & Right("0" & Day(txtNgay), 2) & txtSo
End If
End Sub
Private Sub txtSo_AfterUpdate()
txtSo = Right"000" & txtSo, 4)
Call txtNgay_AfterUpdate
End Sub