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

ValidationRule Bắt buộc Nhập 10 kí tự vào ô text

• Trang chủ

  • Thủ Thuật Access
  • Access Cơ Bản
  • Table
  • [Hỏi] ValidationRule Bắt buộc Nhập 10 kí tự vào ô text
• ValidationRule Bắt buộc Nhập 10 kí tự vào ô text

• ValidationRule Bắt buộc Nhập 10 kí tự vào ô text

  minhtungph > 15-05-16, 12:59 PM

  trong access để bắt buộc người ta nhập vào 1 ô định dạng là text với 10 kí tự thì mình sử dụng Input Mask: 0000000000 , nhưng khi nhập liệu nhìn rối mắt quá, bạn nào biết công thức ở ValidationRule phải viết thế nào để bắt buộc nhập 10 kí tự ko. Thân

• RE: ValidationRule Bắt buộc Nhập 10 kí tự vào ô text

  minhtungph > 15-05-16, 01:45 PM

  mình đã tìm ra giải pháp là gõ len([Tên cột])=10, tuy nhiên có 1 vấn đề phát sinh là mình muốn không tính những ô khoảng trắng, và khi người khác nhập khoảng trắng vào thì tự nó loại bỏ, lúc đó mình có công thức: Len(Trim([Tên cột]))=10, tuy nhiên nó vẫn tính các khoảng trắng thừa.

• RE: ValidationRule Bắt buộc Nhập 10 kí tự vào ô text

  minhtungph > 15-05-16, 01:47 PM

  à hiểu rồi, vậy vấn đề ở đây là nó chỉ kiểm đầu vào 10 kí tự, và sau khi mình chuyển qua ô khác thì nó mới báo lỗi và lúc đó nó mới thực hiện hàm trim, nhưng mình muốn vẫn cho nhập các ô rỗng sao cho nhập đủ 10 kí tự khác khoảng trắng thì ngưng, sau đó mới kiểm điều kiện và bỏ các khoảng trắng đi, mong các bạn chỉ giáo, mình là thành viên mới nên còn nhiều bỡ ngỡ.

• RE: ValidationRule Bắt buộc Nhập 10 kí tự vào ô text

  ongke0711 > 15-05-16, 04:00 PM

  Bạn thử cách này. Ví dụ textbox nhập liệu là Text0
  
  

  Mã PHP:

  Private Sub Text0_LostFocus()
    Dim sokytu As Integer
   Me.Text0 = Replace(Me.Text0, " ", "")
   sokytu = Len(Me.Text0)
   Select Case sokytu
       Case Is < 10
           MsgBox "Chua du 10 ky tu"
           Me.Text0.SetFocus
       Case Is > 10
           MsgBox "Vuot qua 10 ky tu"
           Me.Text0.SetFocus
   End Select
End Sub 


• RE: ValidationRule Bắt buộc Nhập 10 kí tự vào ô text

  minhtungph > 16-05-16, 11:45 AM

  (15-05-16, 04:00 PM)ongke0711 Đã viết: Bạn thử cách này. Ví dụ textbox nhập liệu là Text0
  
  

  Mã PHP:

  Private Sub Text0_LostFocus()
   Dim sokytu As Integer
   Me.Text0 = Replace(Me.Text0, " ", "")
   sokytu = Len(Me.Text0)
   Select Case sokytu
       Case Is < 10
           MsgBox "Chua du 10 ky tu"
           Me.Text0.SetFocus
       Case Is > 10
           MsgBox "Vuot qua 10 ky tu"
           Me.Text0.SetFocus
   End Select
End Sub 


  xin bạn hưỡng dẫn kĩ hơn được không ạ, vì mình mới học nên cái mình hỏi là nhập trực tiếp trên table chứ ko phải textbox trên form

• RE: ValidationRule Bắt buộc Nhập 10 kí tự vào ô text

  ongke0711 > 16-05-16, 01:00 PM

  - Dùng input mask là "#########" cho ký tự là số, ?????????? cho text.

• RE: ValidationRule Bắt buộc Nhập 10 kí tự vào ô text

  hieuvn > 16-05-16, 03:36 PM

  bạn mở bảng ở chế độ design xem hình rồi làm theo là được nhé
  
  (không xem được hình thì click vào đây )
  have fun
• Bài trước Bài tiếp