Phòng thí nghiệm Mô phỏng & Truyền số liệu Thí nghiệm TTDL & Mạng máy tính
Trang 16

PHAÀN D
:
LAÄP TRÌNH COÅNG NOÁI TIEÁP MỤC ĐÍCH THÍ NGHIỆM

Giúp sinh viên bằng thực nghiệm khảo sát các vấn đề chính sau đây :
- Lập trình trao đổi thông tin qua cổng nối tiếp
- Lập trình điều khiển Modem
 THIẾT BỊ SỬ DỤNG

1. Máy vi tính.
2. Null Modem
3. Modem
4. Tổng đài
PHẦN I : CƠ SỞ LÝ THUYẾT

I. Cơ bản về Visual Basic 6
- Khởi động Visual Basic: Start > All Programs > Microsoft
Visual Studio 6.0 > Visual Basic 6.0
- Mở một Project mới: File > New Project

Phòng thí nghiệm Mô phỏng & Truyền số liệu Thí nghiệm TTDL & Mạng máy tính
Trang 17
Chọn Project là Standard EXE.
- Cửa sổ chương trình Visual Basic
- Các thuộc tính cơ bản của các đối tượng trong VB6:
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)
- Các sự kiện cơ bản của các đối tượng trên VB6:
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
Label Textbox
Command Button
Option Check box
Frame
Timer
Phòng thí nghiệm Mô phỏng & Truyền số liệu Thí nghiệm TTDL & Mạng máy tính
Trang 19
II. Các lệnh cơ bản trong Visual Basic 6
- Lệnh IF – THEN – ELSE:

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
- 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:
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ụ:
FOR i = 1 TO 100 STEP 2
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.