Dưới đây là một số sự kiện hộp văn bản thường dùng:
1. KeyPress: xảy ra khi người dùng nhắn và thả phím. 2. Click: xảy ra khi người dùng nhắp chuột vào hộp văn bản. 3. Change: xảy ra khi văn bản trong hộp văn bản thay đơi.
4. LostFocus: xảy ra khí một điều khiển mất tiêu điểm
(focus). Lúc này con trỏ khơng cịn nhấp nháy trong. hộp văn bản nữa, ngược lại khi con trỏ nhấp nháy trong hộp văn bản để cho người dùng nhập giá trị vào lúc nảy mới
xuất hiện sự kiện GotFocus).
Ví dụ: Form “#mEvents” làm nhiệm vụ tính tổng hai số. số
thứ nhất để trơng chờ người dùng nhập vào, số thứ hai luơn cố
định là 3. Trong form “fmEvents” ta cĩ ba TextBox: txtSol (chứa số thử nhất), txtSo2 (chứa số thứ hai) và tx(Tong (chứa
tổng của hai số này), Ta xây đựng thủ tục đáp ứng sự kiện khi
ta thay đổi số trong ơ thứ nhất thì tơng hai số cũng thay đối
với giá trị trong ứng. Kết quả được minh họa trong hình sau:
-Hình IV.2- Private Sụb txtSo1_Change()
bdTong.Text = Vai(<tSo1.Text) + Val(xtSo2.Text)
End Sub
1V. SỰ KIỆN TRÊN NÚT (BUTTON)
Nút chỉ cĩ một sự kiện thường dùng nhất, đĩ là Click; Xây ra khi người dùng nhấp chuột trên nút.
Ví dụ: Ta thay đổi lại ví dụ trong phần Hi một chút, ở đây ta cho người dùng nhập vào cả hai số 1 và 2. Khi nhắn nút Tính
(cmdTinh) thì ta sẽ tính tổng của hai số đĩ và hiện kết quả ở
hộp văn bản *Tổng"(xtTong) ẤĐ Teot Events Tính tổng 2 số : Số thứ 1: [3- „ Tổng = ị Số thú 2: -Hình IV.3- 80
Private Sub cmđTinh_ Click()
txtTong.Text = Val(t‹tSo1.Text) + Val(tSo2.Text)
End Sub