Thí nghiệm TTDL & Mạng máy tính - Phần D: Lập trình cổng nối tiếp

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

- Vùng thiết kế:
Thiết kế giao diện của chương trình
- Project Explorer:
Hiển thị tất cả các Form và Module có trong chương trình
- Properties Window:
Hiển thị và cho phép sửa đổi thuộc tính của các đối tượng
- Thanh công cụ:
Tạo các đối tượng cho Project:


Vùng thiết kế Thanh công cụ Project Explorer
Properties Window
Phòng thí nghiệm Mô phỏng & Truyền số liệu Thí nghiệm TTDL & Mạng máy tính
Trang 18

- 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:

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
Công_việc
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
- 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
Phòng thí nghiệm Mô phỏng & Truyền số liệu Thí nghiệm TTDL & Mạng máy tính
Trang 20
Cấu trúc:
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
- 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.