• Tùy chọn
• Đăng nhập
• Đăng ký
• Xem như trên Máy tính
• Accelerated Mobile Pages Theme

Tạo nút lưu

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Thành viên giúp nhau
  • [Help] Tạo nút lưu
• Tạo nút lưu

• Tạo nút lưu

  hoat > 13-10-21, 10:44 PM

  Mình tạo một form nhập thông tin khách hàng có các box nhập liệu: TenKH, Diachi, MaKH, Ngaynhap, NVnhap
  Mình muốn khi bấm nút lưu thì sẽ kiểm tra các trường trên, nếu điền đầy đủ thì cho lưu, còn thiếu trường nào sẽ hiện thông báo và không cho lưu.
  VD: nếu không nhập địa chỉ sẽ hiện thông báo: "Ban chua nhap dia chi"
  và con trỏ sẽ tự đặt ở box Diachi
  Mong được mọi người giúp đỡ.
  
  Cảm ơn mọi người !

• RE: Tạo nút lưu

  ongke0711 > 14-10-21, 10:13 AM

  Bạn thay đổi tên textbox tương ứng trên Form của bạn.
  
  

  Mã PHP:

  Private Sub cmdLuu_Click()
    If Len(Nz(Me.txtTenKH,"")) = 0 Then
        Msgbox "Khong duọc de trong Tên KH"
        Me.txtTenKH.SetFocus
        Exit Sub
    End If
    If Len(Nz(Me.txtDiaChi,"")) = 0 Then
        Msgbox "Khong duọc de trong Dia chi"
        Me.txtDiaChi.SetFocus
        Exit Sub
    End If

    
    'Làm tương tự cho các textbox cần kiểm tra Null.
    ....


End Sub 


• RE: Tạo nút lưu

  hoat > 14-10-21, 03:53 PM

  (14-10-21, 10:13 AM)ongke0711 Đã viết: Bạn thay đổi tên textbox tương ứng trên Form của bạn.
  
  

  Mã PHP:

  Private Sub cmdLuu_Click()
    If Len(Nz(Me.txtTenKH,"")) = 0 Then
        Msgbox "Khong duọc de trong Tên KH"
        Me.txtTenKH.SetFocus
        Exit Sub
    End If
    If Len(Nz(Me.txtDiaChi,"")) = 0 Then
        Msgbox "Khong duọc de trong Dia chi"
        Me.txtDiaChi.SetFocus
        Exit Sub
    End If

    
    'Làm tương tự cho các textbox cần kiểm tra Null.
    ....


End Sub 


  
  Cảm ơn ongke0711 ! trong code của mình thiếu Exit Sub cho mỗi điều kiện nên nó chạy một lèo luôn. [url=https://thuthuataccess.com/forum/user-16696.html][/url]
• Bài trước Bài tiếp