Em chào anh, chị, em trong group,
Em là dân newbie ạ
Các pro cho em hỏi là trong form em có text1, và 2 button: command1, command2
Em để sự kiện on click là
if isnull(me.text1) = true then
 msgbox"nhap du lieu vao text1"
end if


Vậy các pro cho em hỏi làm sao để gán text1 = isnull  vào sự kiện onclick cho command2 ạ

em đã thử  me.text1 = nothing và me.text1 = ""

sau đó ấn button command 2 rồi command 1
Nhưng không hiện ra hộp thoại thông báo
Mong các pro hướng dẫn em viết code, em xin cảm ơn ạ

- Me.text1="" -> nó không phải có giá trị "Null" mà là "Empty string" - Chuỗi rỗng.
- Textbox nó có thể có 3 trạng thái: Không có trị (Null), chuỗi rỗng và có trị. Chuỗi rỗng là khi bạn bấm phím Backspace để xoá chuỗi ký tự trong textbox hoặc khi gán textbox ="".
- Khi muốn giải phóng biến thì mới dùng "Nothing" cho biến đối tượng, còn cho biến chuỗi bình thường thì dùng "vbNullString" hoặc "Empty".
   strText = Empty  --> strText là biến
   strText = vbNullString
   Set objRecordset = Nothing --> objRecordset là biến đối tượng

Thường khi xét textbox có rỗng hay không có trị thì phải dùng kết hợp hàm mới chính xác.
Vd: If Len(Nz(Me.text1,"") = 0 Then ....
Nếu muốn gán trị rỗng cho textbox thì dùng:
   Me.text1=Null
   Me.text1=""

Không thấy ký tự trên txtbox có ba dạng:
1/ IsNull: (Là Null) là giá trị KHÔNG TỒN TẠI, các Software writers thường gọi Giá trị chưa khởi tạo.
2/ IsEmpty (= Empty) là TỒN TẠI CÁI KHÔNG CÓ GÌ, thường gọi Giá trị đã bị xóa.
3/ Tồn tại giá trị khoảng trắng (1 hoặc nhiều khoảng trắng)
Vì vậy cần dùng hàm Trim để xóa các khoảng trắng rồi mới sử dụng phương pháp của ongke0711

bạn thử cách nay xem dung y ban hoi khong 


Private Sub Button1_Click()
    If Nz(Me.text1, "") = "" Then
        MsgBox "nhap du lieu vao text1"
    end if
End Sub

Private Sub Button2_Click()
     Me.tex1 = Null


    If Nz(Me.text1, "") = "" Then
        MsgBox "nhap du lieu vao text1"
    end if
End Sub