VB HOÀNG 2

TRƯỜNG ĐẠI HỌC BÁCH KHOA
TRUNG TÂM TIN HỌC
------
Giáo trình giảng dạy
MICROSOFT VISUAL BASIC


Bài 1: Giới thiệu Microsoft Visual Basic.
Bài 2: Thuộc tính – Sự kiện – Phương thức.
Bài 3: Đối tượng thông dụng và cách sử dụng.
Bài 4: Ngôn ngữ lập trình Visual Basic.
Bài 5: Các điều khiển cơ bản.
Bài 6: Các điều khiển đặc biệt.
Bài 7: Các điều khiển trình bày dữ liệu.
Bài giảng
NGÔN NGỮ LẬP TRÌNH VISUAL BASIC


Bài 8: Các điều khiển về thời gian.
Bài 9: Làm việc với thư mục, ổ đĩa, tập tin.
Bài 10: Làm việc với Menu.
Bài 11: Truy vấn dữ liệu bằng ngôn ngữ SQL.
Bài 12: Làm việc với điều khiển dữ liệu.
Bài 13: Báo cáo.
Bài 14: Dùng Control Data.
Bài giảng
NGÔN NGỮ LẬP TRÌNH VISUAL BASIC


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
1.1. Tổng quan về lập trình trên Windows
1.1.1. Môi trường Windows và các ngôn ngữ lập trình
1.1.2. Giới thiệu lập trình hướng đối tượng, lập trình trực quan
a) Đối tượng (Object) là gì?
Đối tượng là tập hợp bao gồm chương trình và dữ liệu liên quan với nhau tạo thành một đơn vị xử lý độc lập.
b) Lập trình hướng đối tượng
Lập trình hướng đối tượng là phương pháp lập trình lấy đối tượng làm nền tảng để xây dựng chương trình.


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
c) Lập trình trực quan
Là phương pháp lập trình mà khi thiết kế chương trình ta nhìn thấy kết quả qua từng thao tác và giao diện trên cửa sổ Windows khi chương trình thực hiện.
1.2. Giới thiệu Visual Basic 6.0
Visual Basic là ngôn ngữ lập trình hướng đối tượng mang tính trực quan và rất cơ động.
Visual Basic làm việc dưới dạng biểu mẫu (Form) các hộp điều khiển (Control Box)...


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
1.2.1.Yêu cầu hệ thống
Tối thiểu P.II trở lên.
Chạy môi trường Windows 95 trở lên.
128MB Ram.
Ổ cứng còn trống hơn 1GB.
.....
Đĩa cài đặt: VB, MSDN (có thể không cần).


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
1.2.2. Khởi động và thoát khỏi Visual Basic
a. Có thể khởi động Visual Basic bằng nhiều cách sau:
Menu StartProgramsMicrosoft Visual Studio 6.0 Microsoft Visual Basic 6.0.
Double Click vào biểu tượng của VISUAL BASIC trên Desktop.
b. Thoát khỏi VB bằng cách:
Click vào dấu X ở góc trái màn hình VB
Chọn FileExit.


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
1.3. Giao diện và các thành phần cơ bản


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
1.3.1. Màn hình giao diện
a) Thanh tiêu đề (Title bar)
b) Thanh Menu (Menu bar)
c) Thanh công cụ (Toolbar)
d) Hộp công cụ (ToolBox)
e) Cửa sổ thuộc tính (Properties Window)
f) Cửa sổ khảo sát dự án (Project Explorer Window)
g) Cửa sổ bố trí Form (Form Layout Window)


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
CÁC HỘP ĐIỀU KHIỂN


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
Đưa một đối tượng lên Form
Chọn một đối tượng đã đặt trên Form
Di chuyển một đối tượng trên Form
Hiệu chỉnh kích thước đối tượng trên Form
Copy một đối tượng trên Form.
Xóa một đối tượng trên Form


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
1.3.2. Properties Windows
Thay d?i thu?c t�nh
- Khi thi?t k?
. Click chu?t văo d?i tu?ng (h?p di?u khi?u ho?c bi?u m?u) mă ta c?n thay d?i thu?c t�nh.
. G?i c?a s? Properties. (nh?n ph�m F4 ho?c ch?n Window - Properties).
. Xu?t hi?n c?a s? ch?a câc thu?c t�nh. Ta th?c hi?n thay d?i câc thu?c t�nh theo yíu c?u.
- Khi th?c hi?n chuong tr�nh
. Ta vi?t trong chuong tr�nh b?ng d�ng l?nh
[OBJECT.] =


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
1.4. Các bước thiết kế chương trình Visual Basic
Qua 2 bước:
- Thiết kế giao diện.
- Viết Code cho chương trình
Tạo Project (Dự án).
Thiết kế giao diện.
Đặt thuộc tính cho đối tượng.
Viết lệnh xử lý.
Chạy chương trình, gỡ lỗi.
Lưu chương trình.
Biên dịch chương trình.
Mở chương trình đã có trước.


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
1.4. Ví dụ
Thiết kế chương trình tính tổng có giao diện như sau:


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
Yêu cầu:
Thiết kế giao diện như trên.
Nút Tính: tính tổng (hoặc tích) hai số thứ nhất và thứ hai. Kết quả gán và hiện ra ở ô kết quả.
Nút Tiếp xóa dữ liệu có sẵn ở các ô Textbox. Đặt con trỏ vào ô Textbox Số thứ nhât.
Nút Thoát: Thoát khỏi ứng dụng.


Bài 1
GIỚI THIỆU MICROSOFT VISUAL BASIC
Cách thực hiện
Thiết kế giao diện như trên.
Viết code:
Private Sub Cmdthoat_Click(Index As Integer)
End
End Sub

Private Sub Cmdtiep_Click(Index As Integer)
txta = ""
txtb = ""
txtkq = ""
txta.SetFocus
End Sub

Private Sub Cmdtinh_Click(Index As Integer)
Dim a As Double, b As Double, tong As Double
a = Val(txta)
b = Val(txtb)
tong = a + b
txtkq.Text = tong
End Sub