8.1 Cơ bản về Visual Basic 6.0
Visual Basic 6.0 là một phiên bản của bộ cơng cụ lập trình Visual Basic, cho phép người dùng tiếp cận nhanh cách thức lập trình trên mơi trường Windows. Những ai đã từng quen thuộc với Visual Basic thì tìm thấy ở Visual Basic 6.0 những
tính năng trợ giúp mới và các cơng cụ lập trình hiệu quả. Người dùng mới làm quen với Visual Basic cũng cĩ thể làm chủ Visual Basic 6.0 một cách dễ dàng.
8.1.1 Các thuộc tính cơ bản của các đối tượng trong Visual Basic 6.0
Name: tên của đối tượng, mỗi đối tượng phải cĩ tên khác nhau. Caption: hiển thị nội dung trên cửa sổ thiết kế.
TabIndex: thứ tự chuyển đến khi nhấn phím. Tab Font: chọn font hiển thị trên đối tượng. BackColor, ForeColor: chọn màu hiển thị.
Value: giá trị của đối tượng (dùng cho Check box và Option để xác định trạng thái
được chọn hay khơng chọn).
Text: nội dung chứa trong một Textbox.
MultiLine: cho phép hiện nhiều dịng trên Textbox hay khơng. Enable: cho phép đối tượng hoạt động hay khơng.
Duration: xác định thời gian Timer tràn (đơn vị là ms).
8.1.2 Các sự kiện cơ bản của các đối tượng trên Visual Basic 6
Form_Load: xảy ra mỗi khi mở một form.
Click: xảy ra khi thực hiện nhấn chuột trái trên đối tượng. Timer: xảy ra mỗi khi Timer tràn.
8.1.3 Các lệnh cơ bản trong Visual Basic 6
8.1.3.1 Lệnh IF - THEN - ELSE
Cấu trúc lệnh:
IF Điều_kiện_1 THEN Cơng_việc_1
ELSEIF Điều_kiện_2 THEN Cơng_việc_2
ELSEIF Điều_kiện_3 THEN Cơng_việc_3
… ELSE
END IF
Câu lệnh IF - THEN cĩ thể bao gồm nhiều phát biểu ELSEIF hoặc khơng cĩ phát biểu nào.
Ví dụ:
IF a > 10 THEN
MsgBox “Lon hon 10” ELSEIF a > 0 THEN
MsgBox “Lon hon 0 va nho hon 10” ELSE
MsgBox “Nho hon 0” END IF
8.1.3.2 Lệnh SELECT CASE
Trong trường hợp cĩ nhiều lựa chọn cho một biểu thức điều kiện, ta cĩ thể thay bằng lệnh Select Case
Cấu trúc lệnh:
SELECT CASE Biểu_thức_điều _kiện CASE Điều_kiện_1 Lệnh CASE Điều_kiện_2 Lệnh CASE Điều_kiện_3 Lệnh … ELSE Điều_kiện Lệnh END SELECT 8.1.3.3 Lệnh FOR
FOR dùng để tạo vịng lặp xác định trước số lần lặp.
Cấu trúc lệnh:
FOR Biến_đếm = Giá_trị_đầu TO Giá_trị_cuối STEP Bước_nhảy Lệnh
NEXT Biến_đếm
Ví dụ:
Result = Result + 1 NEXT i
Nếu bỏ qua phát biểu STEP thì xem như bước nhảy là 1 và cĩ thể yêu cầu kết thúc vịng lặp FOR bằng lệnh EXIT FOR.
8.1.3.4 Lệnh DO
Lệnh DO dùng để tạo vịng lặp vơ tận và chỉ kết thúc khi điều kiện kiểm tra thoả mãn. Lệnh DO cĩ 2 dạng : kiểm tra điều kiện trước khi thực hiện vịng lăp và sau khi thực hiện vịng lặp.
Cấu trúc lệnh:
DO Lệnh
LOOP WHILE Điều_kiện
Hay:
DO WHILE Điều_kiện Lệnh
LOOP
8.2 Lập trình giao tiếp cổng nối tiếp dùng Visual Basic 6.0 sử dụng Mscomm32.ocx Mscomm32.ocx
8.2.1 Mơ tả
Việc truyền thơng nối tiếp trên Windows được thực hiện thơng qua một ActiveX cĩ sẵn là Microsoft Comm Control. ActiveX này được lưu trữ trong file MSCOMM32.OCX.
ActiveX MsComm được bổ sung vào một Visual Basic Project thơng qua menu
Hình 1.46 – Cách bổ xung ActiveX Microsoft Comm Control vào VB6
Hình 1.47 – Biểu tượng và bảng thuộc tính của ActiveX Microsoft Comm Control
8.2.2 Các tham số và thuộc tính8.2.2.1 Settings 8.2.2.1 Settings
Xác định các tham số cho cổng nối tiếp.
Cú pháp: MSComm1.Settings = ParamString
MSComm1: tên đối tượng
ParamString: là một chuỗi cĩ dạng như sau: "BBBB,P,D,S" BBBB: tốc độ truyền dữ liệu (bps) trong đĩ các giá trị hợp lệ là
110 2400 38400
300 9600 (măc định) 56000
1200 19200 256000