Một số điều kiện tiện ích

Một số điều khiển tiện ích
Một số điều khiển tiện ích
1.
1.
Cách thức hiển thị của Visual Basic
Cách thức hiển thị của Visual Basic
Thông tin được hiển thị trên biểu mẫu theo 3
tầng. Tầng trên cùng chứa các điều khiển phi
đồ hoạ như các nút lệnh, hộp liệt kê, hộp kiểm
và nút tuỳ chọn.
Tầng giữa chứa các điều khiển đồ hoạ như đư
ờng kẻ, hinh ảnh, hộp ảnh và các điều khiển
ảnh. tầng cuối là nơi có thể vẽ các hìnhtrực
tiếp lên biểu mẫu bằng các phương pháp đồ
hoạ

1. Hộp Thoại Chung (CommonDialog)
Với Windows và Visual Basic, ta thường xuyên
gặp 5 hộp thoại chung chuẩn gồm: mở tệp tin, lưu
tập tin, in tệp tin, chọn phông chu và ấn định
màu.
Phương pháp Hộp thoại
ShowSave Nêu hộp thoại File Save
ShowOpen Nêu hộp thoại File Open
ShowColorNêu hộp thoại chọn màu
ShowPrint Nêu hộp thoại Print
ShowFont Nêu hộp thoại chọn phông chu

Mọi hộp thoại chung đều có thể phát sinh một lỗi
nếu người dùng nhắp nút Cancel. Chúng sẽ phát

sinh lỗi hay không, điều đó tuỳ thuộc vào giá trị
hiện hành của tính chất CancelError. Nếu muốn
bẫy một thao tác nhắp nút Cancel của người dùng,
ta ấn định tính chất này là True vào thời gian thiết
kế hoặc dùng mã dưới đây:
[FormName].CommonDialogControlName.Ca
ncelError = True

Private Sub cmdShowBitmap_Click()
CommonDialog1.CancelError = True
On Error GoTo D1
CommonDialog1.ShowOpen
Image1.Picture =
LoadPicture(CommonDialog1.FileName)
D1:
MsgBox Err.Description
End Sub
vÝ dô:

2. điều khiển ListView
điều khiển ListView cho phép ta hiển thị các mục
theo các cách khác nhau. Có thể dùng điều khiển
này để xếp mục thành các cột.
Các mục này có thể có cả biểu tượng lẫn văn bản
để sử dụng ListView, ta trưng hộp Proferty Pages
bằng cách:
đặt ListView lên Form1
Chọn View/Proferty Pages

Private Sub Command1_Click()

Dim i As Byte
Dim j As Byte
ListView1.ListItems.Clear
Randomize
For i = 1 To 3
ListView1.ListItems.Add , , "Dong" & i
For j = 1 To 3
ListView1.ListItems(i).SubItems(j) = Rnd(10)
Next
Next
End Sub