caotrunghieu > 20-01-15, 03:47 PM
caotrunghieu > 22-01-15, 11:40 AM
Xuân Thanh > 23-01-15, 04:26 PM
maidinhdan > 11-02-15, 11:46 AM
(20-01-15, 03:47 PM)caotrunghieu Đã viết: Chào các bạn,Đầu tiên bạn tạo một hàm để kiểm tra
Mình mới học Access nên nhiều điều không biết. Giúp mình câu hỏi này với:
Khai báo field Email bắt buộc phải có @, nếu không có thì báo lỗi.
Khai báo trường điện thoại phải là bằng số và không được vượt quá 11 số.
Mình cảm ơn
Function kiemtraemail(EmailAddress As String) As Boolean
kiemtraemail = EmailAddress Like "*@[A-Z,a-z,0-9]*.*" ' Kiểm tra phải có những kí tự này mới chấp nhận
End Function
If (kiemtraemail(EmailText.Text) = False) Then ‘ Nếu địa chỉ email không đúng
Beep ‘ Kêu 1 tiếng bíp cho người dùng sợ
MsgBox "chu y: Dia chi email khong hop le", vbOKOnly, "Thong bao"
End If
maidinhdan > 07-03-15, 03:40 PM
(20-01-15, 03:47 PM)caotrunghieu Đã viết: Chào các bạn,
Mình mới học Access nên nhiều điều không biết. Giúp mình câu hỏi này với:
Khai báo field Email bắt buộc phải có @, nếu không có thì báo lỗi.
Khai báo trường điện thoại phải là bằng số và không được vượt quá 11 số.
Mình cảm ơn