L b= Bound(Mang_bandau): U b= UBound(Mang_bandau)
12. Cách ộp thoại thông dụng
12.1. Hộp thông điệp (Message Box – MsgBox)
MsgBox được sử dụng để nhắc nhở, thông báo hoặc cảnh báo người dùng. MsgBox có thểđược gọi theo kiểu thủ tục (không có giá trị trả về), hoặc theo kiểu hàm (giá trị trả về là nút lệnh được người dùng chọn). Cú pháp gọi MsgBox như sau: Ø ØDạng thủ tục: Frame nhóm các điều khiển phục vụ việc nhập dữ liệu cho các nhóm vật liệu khác nhau.
MsgBox Prompt, [Buttons], [Title]
Ø
ØDạng hàm
MsgBox(Prompt, [Buttons], [Title])
(Giá trị trả về của hàm có kiểu VbMsgBoxResult – tham khảo trong Object Browser) Trong đó:
Prompt: nội dung dòng nhắc trong MsgBox (kiểu String)
Buttons: kiểu hiển thị biểu tượng và nút lệnh trong MsgBox (tham số này có kiểu là VbMsgBoxStyle – tham khảo trong Object Browser)
Title: nội dung dòng tiêu đề của MsgBox (kiểu String) Ví dụ: MsgBox được gọi với mã lệnh sau:
MsgBox "Bạn có muốn thoát khỏi chương trình không", vbCritical Or _
vbYesNo, "Thoát khỏi chương trình"
12.2. Hộp nhập dữ liệu (Input Box – InputBox)
InputBox được sử dụng nhằm yêu cầu người dùng nhập một chuỗi (String) theo gợi ý của dòng nhắc (Prompt) và tiêu đề (Title) trên đó. InputBox được gọi theo dạng hàm với giá trị trả về là chuỗi dữ liệu mà người dùng nhập.
Cú pháp gọi InputBox thông thường như sau:
InputBox(Prompt, [Title], [Default], [XPos], [YPos])
Trong đó:
Prompt: nội dung dòng nhắc. Title: nội dung tiêu đề.
Default: giá trị mặc định của chuỗi dữ liệu.
XPos, YPos: toạđộ góc trái trên của InputBox khi hiển thị ra màn hình. Ví dụ: gọi InputBox với mã lệnh sau:
Dim LngSodiemMax As Long LngSodiemMax = _
Val(InputBox("Nhập số lượng điểm tối đa (số nguyên dương)", _ "Số điểm tối đa", "100000"))
Title
Prompt
Nếu người dùng bấm nút OK thì giá trị trả về của hàm InputBox là một chuỗi có giá trị “100000”, còn nếu bấm nút Cancel thì giá trị trả về là một chuỗi rỗng.
12.3. Hộp thoại dựa trên điều khiển Common Dialog.
Điều khiển Common Dialog cho phép hiển thị các hộp thoại sau: Ø
ØHộp thoại Open, Save: phục vụ thao tác mở và ghi file một cách trực quan. Ø
ØHộp thoại Color: phục vụ thao tác lựa chọn màu. Ø
ØHộp thoại Font: phục vụ thao tác lựa chọn font chữ. Ø
ØHộp thoại Print: phục vụ thao tác in ấn.
Đểđưa điều khiển này vào trong hộp công cụ điều khiển (Control Toolbox) chọn menu Tools Ö Additional Controls, sau đó chọn Microsoft Common Dialog Control.
Ø
ØCác thuộc tính của điều khiển Common Dialog.
Thuộc tính Mô tả Ghi chú
DialogTitle Tiêu đề của hộp thoại Kiểu String FileName Trả về đường dẫn và tên của file được chọn - Hộp
thoại Open, Save. Kiểu String FileTitle Trả về tên của file được chọn (không chứa đường