Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Tạo mã khách hàng tự động
#1
Mình muốn tạo 1 makh(Mã khách hàng) tự động là khi mình thêm 1 khách hàng thì tự động tạo ra mã khách hàng. VD: makh00001, makh00002,makh00003...
Vấn đề thứ 2:là mình co ngày đến, ngày di, tính tiền. Mình muốn khi thêm Khách hàng thì sẽ ghi ngày đến bằng ngày hiện hành và khi tính tiền sẽ lấy ngày di - ngày đến * giá.
Mong các bạn giúp đỡ

------------
Chú ý tiêu đề bài viết
Admin
Chữ ký của thanhhau828 Xin chào, mình là thanhhau828, Tham gia http://thuthuataccess.com/forum từ ngày 18-04 -13.
Reply
Những người đã cảm ơn
#2
Mã PHP:
Private Sub cmdAddNew_Click()
    
Dim STT As Integer
    STT 
DCount("MaKH"tblKhachHang) + 1
    Me
.MaKH.SetForcus
    Me
.MaKH "KH" Right("00000" STT5)
    
Me.txtNgayDen Date
End Sub

Private Sub cmdBill_Click()
    
Me.txtThanhTien = (Me.txtNgayDi.Value Me.txtNgayDen.Value) * txtDonGia.Value
End Sub 

Test lại nhé
Thân
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#3
vấn đề ngày giờ như bạn nói thì liên hệ với tôi: 01683.850.700.
sẵn sàng giúp bạn.
cái này tôi rành.
Chữ ký của danhxetnghiem Đừng bao giờ so sánh đoạn đầu của bạn với đoạn giữa của người khác
Reply
Những người đã cảm ơn
#4
Bạn cho mình hỏi thêm về kiểm tra ngày đến đi minh nhập vào phải đúng. VD: 30/2 là báo lỗi.Mình muốn tắt thông báo lỗi và hiển thị thông báo của mình. em muốn viết ở sự kiện gotfocus thì sẽ báo lỗi, anh thấy nên viết ở sự kiện nào thì chỉ giúp em với
Chữ ký của thanhhau828 Xin chào, mình là thanhhau828, Tham gia http://thuthuataccess.com/forum từ ngày 18-04 -13.
Reply
Những người đã cảm ơn
#5
Dùng Hàm IsDate để kiểm tra, True là OK, False là Sai===>ra thông báo
Thân
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#6
mình biết là dùng hàm isdate rồi. nhưng mình viết ở sự kiện nào? và mình cần tắt thông báo lỗi của access nữa?
Chữ ký của thanhhau828 Xin chào, mình là thanhhau828, Tham gia http://thuthuataccess.com/forum từ ngày 18-04 -13.
Reply
Những người đã cảm ơn
#7
Mã:
Private Sub txtNgay_AfterUpdate()
    If IsDate(txtNgay) = False Then
        DoCmd.SetWarnings False
        MsgBox"Ngay thang khong hop le" , , "Thong Bao"
        DoCmd.SetWarnings True
        Exit Sub
    End If
End Sub
Chữ ký của Xuân Thanh Trăm năm trước thì ta chưa gặp
Trăm năm sau biết gặp được không?
Cuộc đời sắc sắc không không
Thì thôi ta cứ hết lòng vì nhau
ღღღღღTài sản của Xuân Thanh (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Tự động hiện Form khi loading hết thời gian ChiMai 1 37 02-12-16, 08:59 PM
Bài mới nhất: ongke0711
  Xin giúp tạo 1 trường trong table đánh số tự động thay cho autonumber trungminh 7 448 16-09-16, 05:17 PM
Bài mới nhất: maidinhdan
Photo [Hỏi] Tạo nút tự động đánh lại số CT khanh 12 407 03-08-16, 08:23 PM
Bài mới nhất: ongke0711
  [Hỏi] Hỏi cách chọn combobox tự động cannguyen 6 584 03-06-16, 11:40 PM
Bài mới nhất: cannguyen
  [Help] Tự động lưu dữ liệu trên textbox vào table jason 34 2,702 22-05-16, 11:39 AM
Bài mới nhất: thanhtruong

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ