Sau đây mình xin giới hiệu hàm msgbox để làm gì ?
- Hàm msgbox để hiển thị một câu thông báo cho người dùng biết
- Hàm msgbox có icon (hình ảnh) hiển thị để thông báo trực quan hơn
- Hàm msgbox có chức năng lấy được tình trạng xác nhận qua nút lệnh để biết người dùng chọn hành đồng gì
Kiểu hay sử dụng: MsgBox "Thong bao"
Ngoài ra hàm msgbox có nhiều cách hiển thị nữa để phần mềm trực quan thêm
Kiểu Msgbox 1
MsgBox "Thong bao", vbCritical, "iif"
* Thông báo lỗi
Ví dụ: Ví dụ ô Họ tên bắt buộc nhập nhưng người dùng để trống thì nên báo đỏ để biết.
Kiểu Msgbox 2
MsgBox "Thong bao", vbExclamation, "iif"
* Cảnh báo, ví dụ bạn qua một con đường trơn thì có biển hiện cảnh báo là đường trơn, còn bạn vẫn đi tiếp được.
Khi làm phần mềm thì ứng dụng trong trường hợp: nếu người dùng quên nhập điện thoại nhưng phần mềm không bắt buộc nhập số điện thoại
thì cảnh bảo:
MsgBox "Hay nhap so dien thoai de chung toi ho tro tot hon", vbExclamation, "iif"
Kiểu Msgbox 3
MsgBox "Thong bao", vbInformation, "iif"
* Cung cấp thông tin
MsgBox "Luu thanh cong", vbInformation, "iif"
Kiểu Msgbox 4
MsgBox "Thong bao", vbQuestion, "iif"
* Hỏi người dùng:
MsgBox "Ban co muon xoa hay khong ?", vbQuestion, "iif"
- Ví dụ này thì làm sao phần mềm biết người dùng có đồng ý hay không đồng ý
xacnhan = MsgBox("Ban co muon xoa hay khong ?", vbQuestion + vbOKCancel, "iif")
'MsgBox xacnhan
If xacnhan = 2 Then
MsgBox "code XOA 1: OK"
Else
MsgBox "code XOA 1: Cancel"
End If
If xacnhan = vbOK Then
MsgBox "code XOA 2: OK"
Else
MsgBox "code XOA 2: Cancel"
End If
Kiểu Msgbox 5
MsgBox "Thong bao", vbMsgBoxRight, "iif"
* Xuất hiện bên phải: ít khi sử dụng.
Kiểu Msgbox 6
MsgBox "Kieu 5", vbOKCancel, "iif"
* Có nút OK và Cancel
Kiểu Msgbox 7
MsgBox "Kieu 6", vbYesNo, "iif"
* Có nút Yes và No
Kiểu Msgbox 8
MsgBox "Kieu 7", vbYesNoCancel, "iif"
* Có nút Yes, No, Cancel