Hi mọi người
Mình có thông báo như hình.Nếu để là Docmd.Setwarnings flase thì ko hiển thị thông báo và tự động là YES.Mình muốn không hiện thông báo này và tự động chọn là NO
Thank

(31-08-15, 11:25 AM)thanhquyt Đã viết: Hi mọi người
Mình có thông báo như hình.Nếu để là Docmd.Setwarnings flase thì ko hiển thị thông báo và tự động là YES.Mình muốn không hiện thông báo này và tự động chọn là NO
Thank

Thì bạn không cho chạy querry xóa nữa là nó không hiển thị   Cái hiển thị đó thường hiện lên lúc bạn muốn xóa một bản ghi của một bảng, giờ bạn muốn nó hiển thị là No có nghĩa là không muốn xóa nó thì tốt nhất là không chạy lệnh xóa nữa.

(31-08-15, 12:06 PM)ledangvan Đã viết:

(31-08-15, 11:25 AM)thanhquyt Đã viết: Hi mọi người
Mình có thông báo như hình.Nếu để là Docmd.Setwarnings flase thì ko hiển thị thông báo và tự động là YES.Mình muốn không hiện thông báo này và tự động chọn là NO
Thank

Thì bạn không cho chạy querry xóa nữa là nó không hiển thị   Cái hiển thị đó thường hiện lên lúc bạn muốn xóa một bản ghi của một bảng, giờ bạn muốn nó hiển thị là No có nghĩa là không muốn xóa nó thì tốt nhất là không chạy lệnh xóa nữa.

Ý bạn chắc muốn mặc định là chữ No phải không.
Hình minh hoạ



Trả lời:

Xử lý triệt để thông báo xóa query.
[Tool] \ [Option] \ [Edit/Find] \ No check [Action query]

(31-08-15, 04:55 PM)maidinhdan Đã viết:

(31-08-15, 12:06 PM)ledangvan Đã viết:

(31-08-15, 11:25 AM)thanhquyt Đã viết: Hi mọi người
Mình có thông báo như hình.Nếu để là Docmd.Setwarnings flase thì ko hiển thị thông báo và tự động là YES.Mình muốn không hiện thông báo này và tự động chọn là NO
Thank

Thì bạn không cho chạy querry xóa nữa là nó không hiển thị   Cái hiển thị đó thường hiện lên lúc bạn muốn xóa một bản ghi của một bảng, giờ bạn muốn nó hiển thị là No có nghĩa là không muốn xóa nó thì tốt nhất là không chạy lệnh xóa nữa.

Ý bạn chắc muốn mặc định là chữ No phải không.
Hình minh hoạ



Trả lời:

Mã PHP:

Select Case MsgBox("Ban co muon xoa khong?", vbYesNo Or vbExclamation Or vbDefaultButton2, "Xoa")
    Case vbYes
        DoCmd.SetWarnings False
        ' Chen lenh xoa vao day
        
    Case vbNo
        MsgBox "Da huy cau lenh"
End Select 


Cho mình hỏi đoạn code này chèn vào chổ nào trên form vậy bạn
Thank

Nói thẳng mình không thích cách hỏi này của bạn thanhquyt.

Với câu hỏi và tấm hình này sẽ có ít nhất 2 trường hợp xảy ra việc ms access đưa ra thông báo.
1/ Khi chạy VBA SQL delete query
2/ Khi sử dụng lệnh xóa record bằng command (hoặc khi dùng phím delete xóa record trên form continous)
Đó là chưa nói thông báo trên có thể xảy ra do các event phức tạp khác.
Tùy từng trường hợp sẽ có những giài quyết khác nhau. Cứ hỏi chung chung kiểu này. Biết làm sao trả lời cho đúng.

Mình có câu lệnh xuất hộp thoại thông báo!
Msgbox " Chao cac ban den voi chuong  trinh Microsoft Access 2016", vbOKOnly, "Thong bao"
Khi xuat ra chữ OK nằm bên góc phải, giờ muốn cho chữ OK nằm ở giữa thì phải làm sao ạ!

(04-09-15, 07:26 PM)NganNguyen Đã viết: Mình có câu lệnh xuất hộp thoại thông báo!
Msgbox " Chao cac ban den voi chuong  trinh Microsoft Access 2016", vbOKOnly, "Thong bao"
Khi xuat ra chữ OK nằm bên góc phải, giờ muốn cho chữ OK nằm ở giữa thì phải làm sao ạ!

Msgbox cũng vẫn là một form do access thiết kế. Trước đây có thời điểm msgbox có các nút được canh giữa -  access 97. Dưới đây cũng là một cách để xử lý để chuyển sang canh giữa các nút command.
Msg Box tiếng Việt Unicode có định dạng chữ đậm