Một Số Lệnh Cơ Bản
Lệnh End: Dùng chấm dứt một chương trình VB đang thực hiện.
Lệnh gán: Ký hiệu =, lệnh này có công dụng gán giá trị vào biến hoặc gán giá trị mới vào một thuộc tính của đối tượng.
Lệnh Val: chuyển từ chuỗi sang số. Chi tiết về kiểu dữ liệu sẽ được đề cập ở các bài sau.
Bài tập thực hành 1
Thiết một Form và viết chương trình cho from hoạt động như sau:
Trên Form có một textbox được đặt tên txt_mess, nội dung ban đầu là rỗng. Font chữ tiếng Việt, kích thước 14pt
3 đối tượng còn lại là 3 commandbutton có tên tuần tự như sau: cmd_mess, cmd_del, cmd_end.
Khi sự kiện vào cmd_mess thì câu chào “Chúc mừng bạn đến với VB” xuất hiện trên textbox txt_mess.
Khi click vào cmd_del nội dung trên textbox bị xóa.
Khi click vào trên cmd_end thì chương trình kết thúc.
Khi double – click vào textbox txt_mess thì hiển thị website của bạn
Trình tự thực hiện:
Thiết kế Form
Tạo một folder mới trên dĩa
Open một project mới.
Đặt tên cho Form là frm_main, caption là “chương trình đầu tiên”
Đưa một textbox lên Form, đặt tên là txt_mess, thuộc tính text=””, font chữ VNI_DUFF, cở chữ 14, Aligment: center
Đưa một command button lên Form, chỉnh kích thước, chọn font chữ VNI-APTIMA, cở chữ 10. Đặt caption=In lời chào, Name=cmd_mess
Chọn nút lệnh thứ hai, đặt name=cmd_del, caption=Xoá nội dung trong textbox
Chọn nút lệnh thứ ba, đặt name=cmd_end, caption=kết thúc
Viết lệnh cho chương trình
Nhấp kép vào nút lệnh cmd_mess:
Nhập thêm hàng quy định cách khai báo biến: Option Explicit ngay đầu (xem hình). Từ nay về sau, trong tất cả các bài tập, bạn phải khai báo hàng này vào đầu tất cả các Form. Về chi tiết cho khai báo này sẽ được đề cập chi tiết ở các chương sau.
Nhập dòng lệnh sau:txt_mess.text=”Chúc mừng bạn đến với VB” vào giữa dòng tiêu đề và dòng kết thúc
Chọn đối tượng cmd_del trên combo box object, chọn sự kiện click. gỏ vào lệnh sau: txt_mess=”” (Xóa nội dung của textbox)
Chọn đối tượng cmd_end trên hộp chọn phía trên bên trái, chọn sự kiện click trên combobox even. Gõ vào lệnh sau: end
Mở cửa sổ Form, bấm double click trên txt_mess để mở cửa sổ code. Trong khi con trỏ chuột đang nằm giữa vùng Private Sub txtmess_Change() …. End Sub thì chọn hộp danh sách (chứa sự kiện) bên góc trên phải, chọn vào sự kiện DblClick
Viết code xử lý cho sự kiện double – click trên textbox
Chia sẻ với bạn bè của bạn: |