dung > 06-10-10, 09:28 PM
Noname > 06-10-10, 10:23 PM
(06-10-10, 09:28 PM)dung Đã viết: Tôi muốn hỏi A Noname: Tôi có tạo một main_Subform liên kết với nhau thông qua một textbox có tên là tháng, nhưng khi nhập vào textbox có số đứng trước là số 0, ví dụ: 09 thì subform không hiểu, phải nhập số : 9, do đó tôi muốn khi người dùng nhập vào như thế sẽ hiện lên thông báo. Nhờ A giúp dùm tôi xin cám ơn
dung > 06-10-10, 10:39 PM
Noname > 06-10-10, 10:43 PM
dung > 06-10-10, 11:29 PM
dung > 06-10-10, 11:48 PM
Noname > 07-10-10, 12:15 AM
Private Sub Text4_BeforeUpdate(Cancel As Integer)
If Text4 <> 1 And Text4 <> 2 And Text4 <> 3 And Text4 <> 4 And Text4 <> 5 And Text4 <> 6 And Text4 <> 7 And Text4 <> 8 And Text4 <> 9 And Text4 <> 10 And Text4 <> 11 And Text4 <> 12 Then
MsgBox "nhap sai thang"
End If
End Sub
haquocquan > 07-10-10, 06:50 PM
(07-10-10, 12:15 AM)Noname Đã viết: Điều cốt lõi là bạn phải format textbox đó kiểu number để tránh số 0 đằng trước.Không cần dài dòng thế đâu nhỉ. Theo tôi chỉ cần:
Còn việc thông báo thì cứ chặn trong sự kiện before_Update của textbox là được
Ví dụ:
Mã:Private Sub Text4_BeforeUpdate(Cancel As Integer)
If Text4 <> 1 And Text4 <> 2 And Text4 <> 3 And Text4 <> 4 And Text4 <> 5 And Text4 <> 6 And Text4 <> 7 And Text4 <> 8 And Text4 <> 9 And Text4 <> 10 And Text4 <> 11 And Text4 <> 12 Then
MsgBox "nhap sai thang"
End If
End Sub
Với text4 là text đang xem xét!
Private Sub Text4_BeforeUpdate(Cancel As Integer)
If Text4 <1 or Text4 > 12 Then
MsgBox "nhap sai thang"
End If
End Sub
Noname > 07-10-10, 07:05 PM