giúp em thêm đoạn kiểm tra dữ liệu nhập trên form trước khi lưu xuống sheet (1 người xem)

Người dùng đang xem chủ đề này

quoc nhat

Thành viên tiêu biểu
Tham gia
8/3/12
Bài viết
567
Được thích
43
Nghề nghiệp
cán bộ ngành y tế
Chào mọi người!
Em có 1 Userform dùng để nhập thông tin về thẻ BHYT
các trường kiểm tra khác trong nút lệnh Ghi lại thì em đã làm được rồi chỉ còn thiếu một đoạn kiểm tra:
- nếu 2 ký tự đầu của textbox số BHYT sau khi nhập là TE thì bắt buộc phải nhập thêm họ tên bố mẹ vào textbox họ tên bố mẹ nếu khác thì bỏ qua
Em không biết đoạn code này phải viết thế nào nên nhờ các anh chị giúp đỡ
Em cảm ơn nhiều!
 

File đính kèm

Thêm đoạn code sau vào dòng 10 của Private Sub CommandButton5_Click() :

Mã:
ElseIf TextBox1 Like "TE*" And TextBox6 = "" Then
    MsgBox ("Nhap Ten bo me:"), vbOKOnly, "THÔNG BÁO!!"
    TextBox6.SetFocus
    Exit Sub
Else
 
Upvote 0
thêm đoạn code sau vào dòng 10 của private sub commandbutton5_click() :

Mã:
elseif textbox1 like "te*" and textbox6 = "" then
    msgbox ("nhap ten bo me:"), vbokonly, "thông báo!!"
    textbox6.setfocus
    exit sub
else
tuyết quá
đúng ý em rồi cảm ơn anh nhièu
 
Upvote 0
Bạn nên thêm sự kiện Change ở textbox chứa mã thẻ BHYT để khi có mã TE... thì label33.caption (chú thích cho text box cha mẹ) tự động thêm "(*)" vào, kết hợp với bài trên thì người dùng sẽ dễ thấy hơn.
vâng cảm ơn anh nhiều. Em sẽ lưu ý vào cho vào ạ!
 
Upvote 0

Bài viết mới nhất

Back
Top Bottom