Giáo trình Visual Basic 6.0
Nguyễn Đăng Quang
27
Chương 3
Kiểu dữ liệu – Hằng – Biến
I. BIẾN (Variable)
1. Định nghĩa
Biến là ô nhớ chứa dữ liệu, giá trị của biến có thể thay đổi trong chương trình.
2. Khai báo
Dạng
Dim <Tên> As <Kiểu> [,<Tên> As <Kiểu>]
Hoặc
Dim <Tên>
Trường hợp đầu, kiểu biến được khai báo rõ ràng, trường hợp sau kiểu của biến sẽ
được xác định khi có lệnh gán giá trị cho biến.
Ví dụ:

Dim X As Integer
Dim Ht As String
3. Qui tắc đặt tên biến
− Có chiều dài tối đa 255
− Không được bắt đầu bằng số
− Không sử dụng khoảng trắng
− Không dùng các ký hiệu toán tử
− Không trùng từ khoá
− Không phân biệt chữ thường và chữ in
Ví dụ

Các biến đặt tên đúng
MyNum&
i%

 Qui định bằng tuỳ chọn Require variable Declaration trong
Tools/Options/Editor
Giá trị ban đầu của các loại biến sau khi khai báo như sau:
Kiểu d
ữ liệu Giá trị đầu
Integer
0
Long
0
Single
0
Double
0
String
"" (blank)
Boolean
False
Variant
EMPTY
Date
0
Currency
0

5. Phạm vi sử dụng biến
Một biến được khai báo chỉ tồn tại trong phạm vi khai báo, ngoài phạm vi đó mà sử
dụng lại Visual Basic sẽ xem như biến mới.
• Biến khai báo trong chương trình con chỉ có ý nghĩa trong chương trình con
đó. Trong ví dụ sau, các biến X, Y, Z chỉ có ý nghĩa trong thủ tục xử lý sự kiện
cmdTinh.

Dim a
A
s Inte
g
e
r

Dimb
A
s Inte
g
e
r
Form1
Form2
 Biến a chỉ có ý nghĩa
trong form1
 Biến b chỉ có ý nghĩa
trong form2
Private sub XXX()
…
m
…
End sub Private sub xxx()
…
m
…

 Biến a có thể sử dụng
trong form khác
 Biến b chỉ có ý nghĩa
trong form2
Giáo trình Visual Basic 6.0

30
6. Biến tĩnh
Là biến được khai báo với từ khoá static trong 1 chương trình con. Giá trị của biến
tĩnh được sử dụng lại cho các lần gọi sau của chương trình con
Ví dụ
: Thông báo số lần bấm nút, biến iNumOfClicks được khai báo tĩnh.
Private Sub MyButton_Click()
Static iNumOfClicks as Integer
iNumOfClicks = iNumOfClicks + 1
MsgBox "Number of Clicks: " & CStr(iNumOfClicks)
End Sub
II. KIỂU DỮ LIỆU
Kiểu
Kích thước Phạm vi chứa
Byte
1 byte 0 255
Integer
2 bytes -32,768 32,767
Long
4 bytes Khoảng +/- 2.1E9
Single
4 bytes -3.402823E38 -1.401298E-45 (giá trị âm)
1.401298E-45 3.402823E38 (Giá trị dương)
Double

Giáo trình Visual Basic 6.0
Nguyễn Đăng Quang
3
1
IV. TOÁN TỬ
Toán tử Ý nghĩa
^ Mũ
- Đảo dấu
*, / Nhân chia
\ Chia nguyên
Mod Lấy phần dư phép chia số
nguyên
+, - Cộng, trừ
& Ghép chuỗi
=, <>, <, >, <=,
>=
So sánh
Not, And, Or Luận lý
V. MỘT SỐ HÀM CHUẨN
1. Hàm đại số
Hàm Ý nghĩa Ví dụ
Abs(n)
⏐x⏐
Abs(-5) = 5
Sqr(x)
Căn bậc 2 Sqr(4)=2
Exp(x)
ex Exp(1)= 2.718282
Log(x)
Logx Tính

Năm Year((#12/2/00#)=2000
Weekday(d)
Ngày trong tuần (1-Chủ nhật, 2-Thứ
hai, 7-Thứ bảy)
Weekday(Date)
Giáo trình Visual Basic 6.0

32
3. Hàm chuyển đổi
Hàm Ý nghĩa Ví dụ
Asc(n)
Mã Ascii của ký tự n Asc(‘a’)=97, asc(‘A’)=65
Chr(n)
Ký tự có mã n Chr(65)=’A’
Ucase(s)
Đổi chuỗi chữ thường thành chữ in Ucase(“abcd”)=”ABCD”
Val(s)
Đổi chuỗi thành số Val(“1234”)=1234
Str(n)
Đổi số thành chuỗi Str(12.45)=” 12.45”
Str(-4.56) = “-4.56”
4. Hàm kiểm tra kiểu dữ liệu
Hàm Ý nghĩa
IsNumeric(n)
Kiểm tra n có phải là số hợp lệ
IsDate(n)
Kiểm tra n có phải là giá trị ngày hợp lệ
VI. HỘP THÔNG BÁO (MESSAGE BOX)
Là một lớp cửa sổ windows đã định nghĩa sẵn. Hộp thông báo được để trình bày các
thông điệp nhắc nhở người dùng từ chuơng trình hoặc yêu cầu người dùng xác nhận

3
vbExclamation 48 Icon
vbInformation 64 Icon
vbDefaultButton1 0 Nút đầu tiên mặc định có focus
vbDefaultButton2 256 Nút thứ hai mặc định có focus
Focus
vbDefaultButton3 512 Nút thứ ba mặc định có focus
vbApplicationModal 0 Người dùng phải trả lời rồi mới có
thể tiếp tục sử dụng chương trình,
có thể chuyển sang các chương
trình khác
Modal
vbSystemModal 4096 Người dùng phải trả lời rồi mới có
thể tiếp tục sử dụng chương trình,
không thể chuyển sang các
chương trình khác
Tham số <các button> được lấy giá trị bằng tổng các hằng trong mỗi nhóm trên.
Ví dụ

Giá trị vbYesNo+vbQuestion+vbDefaultButton1 làm cho hộp thông báo có 2 nút
Yes-No, Icon hiển thị là Question, nút đầu tiên có focus.
Nếu bỏ qua tham số này, hộp thông báo chỉ có nút OK
<Tiêu đề>
Qui định tiêu đề hộp thông báo, nếu không có tham số này, tiêu đề sẽ là tên của
chương trình.
• Khi muốn sử dụng MsgBox với mục đích thông báo, thường chỉ cần ghi tham số
thứ nhất. Ví dụ:
If Not IsNumeric(Text1.Text) then
MsgBox “Dữ liệu nhập không hợp lệ”
End if