Hàm MsgBox

Áp dụng cho
Access cho Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

Trong cơ sở dữ liệu Access trên máy tính, hàm hiển MsgBox thị một thông báo trong một hộp thoại, đợi người dùng chọn một nút và trả về một biểu Integer tượng cho biết người dùng đã chọn nút nào.

Cú pháp

MsgBox(prompt[, buttons][, title][, helpfile][, context])

Cú MsgBox pháp hàm có các đối số sau:

Đối số Mô tả
prompt Bắt buộc. Biểu thức chuỗi được hiển thị dưới dạng thông báo trong hộp thoại. Độ dài tối đa là prompt khoảng 1024 ký tự, tùy thuộc vào độ rộng của các ký tự được sử dụng. Nếu prompt có nhiều dòng, bạn có thể phân tách các dòng bằng cách dùng ký tự quay lại đầu dòng (),Chr(13) ký tự xuống dòng ()Chr(10) hoặc kết hợp chuyển dòng-xuống dòng (Chr(13) & Chr(10)) giữa mỗi dòng.
buttons Không bắt buộc. Biểu thức số là tổng của các giá trị chỉ định số và loại nút được hiển thị, kiểu biểu tượng cần sử dụng, căn cước của nút mặc định và phương thức của hộp thông báo. Nếu bỏ qua, giá trị mặc định của nó buttons là 0.
title Không bắt buộc. Biểu thức chuỗi được hiển thị trên thanh tiêu đề của hộp thoại. Nếu bạn bỏ qua title, tên ứng dụng sẽ xuất hiện trên thanh tiêu đề.
helpfile Không bắt buộc. Biểu thức chuỗi xác định tệp Trợ giúp cần sử dụng để cung cấp Trợ giúp theo ngữ cảnh cho hộp thoại. Nếu helpfile được cung cấp, cũng context phải được cung cấp.
context Không bắt buộc. Biểu thức số là số ngữ cảnh Trợ giúp được tác giả Trợ giúp gán cho chủ đề Trợ giúp thích hợp. Nếu context được cung cấp, cũng helpfile phải được cung cấp.

Cài đặt

Các buttons thiết đặt đối số là:

Hằng số Giá trị Mô tả
vbOKOnly 0 Chỉ hiển thị OK .
vbOKCancel 1 Hiển thị OK và Hủy.
vbAbortRetryIgnore 2 Hiển thị , Bỏ dừng, Thử lại và Bỏ qua.
vbYesNoCancel 3 Hiển thị có, không vàhủy.
vbYesNo 4 Hiển thị Có và Không.
vbRetryCancel 5 Hiển thị , Thử lại vàHủy bỏ.
vbCritical 16 Hiển thị biểu tượng Thông báo Quan trọng .
vbQuestion 32 Hiển thị biểu tượng Truy vấn Cảnh báo .
vbExclamation 48 Hiển thị biểu tượng Thông báo Cảnh báo .
vbInformation 64 Hiển thị biểu tượng Thông báo Thông tin .
vbDefaultButton1 0 Đặt nút đầu tiên làm mặc định.
vbDefaultButton2 256 Đặt nút thứ hai làm mặc định.
vbDefaultButton3 512 Đặt nút thứ ba làm mặc định.
vbDefaultButton4 768 Đặt nút thứ tư làm mặc định.
vbApplicationModal 0 Modal ứng dụng. Người dùng phải phản hồi hộp thông báo trước khi tiếp tục làm việc trong ứng dụng hiện tại.
vbSystemModal 4096 Động từ hệ thống. Tất cả các ứng dụng sẽ bị tạm ngừng cho đến khi người dùng phản hồi hộp thông báo.
vbMsgBoxHelpButton 16384 Thêm nút Trợ giúp vào hộp thông báo.
VbMsgBoxSetForeground 65536 Chỉ rõ cửa sổ hộp thông báo làm cửa sổ tiền cảnh.
vbMsgBoxRight 524288 Căn phải văn bản.
vbMsgBoxRtlReading 1048576 Làm cho văn bản hiển thị với dạng đọc từ phải sang trái trên hệ thống tiếng Do Thái và tiếng Ả Rập.

Nhóm giá trị đầu tiên (0 thông qua 5) mô tả số và loại của nút hiển thị trong hộp thoại. Nhóm thứ hai (16, 32, 48, 64) mô tả kiểu biểu tượng. Nhóm thứ ba (0, 256, 512) xác định nút nào là mặc định. Nhóm thứ tư (0,) 4096xác định phương thức của hộp thông báo. Khi bạn cộng các số để tạo ra giá trị cuối cùng cho đối buttons số, chỉ dùng một số từ mỗi nhóm.

Lưu ý

Các hằng số này được xác định bởi Visual Basic for Applications. Do đó, bạn có thể sử dụng tên ở bất cứ đâu trong mã thay vì giá trị thực sự.

Trả về giá trị

Hằng số Giá trị Mô tả
vbOK 1 OK
vbCancel 2 Hủy bỏ
vbAbort 3 Bỏ dở
vbRetry 4 Thử lại
vbIgnore 5 Bỏ qua
vbYes 6 Có
vbNo 7 Không

Chú thích

Khi cả hai và helpfilecontext được cung cấp, người dùng có thể nhấn F1 trong Windows hoặc Trợ giúp trong macOS để xem chủ đề Trợ giúp phù hợp với context. Một số ứng dụng máy chủ, chẳng hạn như Microsoft Excel, cũng tự động thêm nút Trợ giúp vào hộp thoại.

Nếu hộp thoại hiển thị nút Hủy bỏ , nhấn Esc có hiệu quả tương tự như chọn Hủy bỏ. Nếu hộp thoại chứa nút Trợ giúp , thì Trợ giúp theo ngữ cảnh sẽ được cung cấp dành cho hộp thoại. Tuy nhiên, không có giá trị nào được trả về cho đến khi người dùng chọn một trong các nút còn lại.

Lưu ý

Để chỉ định nhiều hơn tham đối được đặt tên đầu tiên, bạn phải sử dụng MsgBox trong một biểu thức. Để bỏ qua một số đối số vị trí, bạn phải đưa vào dấu tách bằng dấu phẩy tương ứng.

Ví dụ

Lưu ý

Ví dụ sau đây sẽ giải thích cách sử dụng hàm này trong mô-đun Visual Basic for Applications (VBA).

Ví dụ này sử dụng MsgBox hàm này để hiển thị thông báo lỗi nghiêm trọng trong hộp thoại với các nút Có và Không . Nút Không được xác định làm câu trả lời mặc định. Giá trị do MsgBox hàm trả về phụ thuộc vào nút mà người dùng chọn. Ví dụ này giả định rằng là DEMO.HLP một tệp Trợ giúp chứa một chủ đề với số ngữ cảnh Trợ giúp bằng với .1000

Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Do you want to continue?"
Style = vbYesNo + vbCritical + vbDefaultButton2
Title = "MsgBox Demonstration"
Help = "DEMO.HLP"
Ctxt = 1000
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then    ' User chose Yes.
    MyString = "Yes"    ' Perform some action.
Else    ' User chose No.
    MyString = "No"    ' Perform some action.
End If