Toán tử so sánh

Một phần của tài liệu Giao trinh visual basic 2008x (Trang 41 - 43)

I. Giới thiệu lập trình hướng đối tượng

3-Toán tử so sánh

TypeOf … Is… :So sánh kiểu của biến kiểu tham chiếu thứ nhất có trùng kiểu trên toán hạng thứ

hai, nếu trùng trả về True, ngược lại False

Is Toán tử dành cho toán hạng kiểu tham chiếu, trả về True nếu hai toán hạng cùng

tham chiếu đến một đối tượng, ngược lại là False)

Like Toán tử dành cho toán hạng kiểu String, trả về True nếu toán hạng thứ nhất trùng

với mẫu (pattern) của toán hạng thứ hai, ngược lại là False.

Toán tử luận lý và Bitwise

Not Trả về giá trị ngược lại của toán hạng

And Trả về True (1) khi và chỉ khi hai toán hạng cùng là True (1)

AndAlso Trả về giá trị như And nhưng khi toán hạng thứ nhất là False (0) sẽ không kiểm tra

Or Trả về False (0) khi và chỉ khi hai toán hạng cùng là False (0)

OrElse Trả về giá trị như Or nhưng khi toán hạng thứ nhất là True (1) sẽ không kiểm tra toán

hạng thứ hai và trả về True (1)

Xor Trả về True (1) khi và chỉ khi có 1 toán hạng là True (1) II.4. Mảng (Array)

1 - Mảng(Array) là gì?

Trong những bài học trên bạn đã tìm hiểu khá nhiều về biến . Bạn đã có thể đưa giá trị các con số hay các dòng chữ vào biến rồi.

Bạn có thể thấy mỗi biến chỉ chứa được một thông tin mà thôi. Một mảng cũng là một biến nhưng nó giúp bạn chứa nhiều giá trị vào nó.

2 - Cách khai báo mảng Hãy xem ví dụ sau đây:

Số dòng Bật/Tắt | Mở rộng/Rút gọn | Chọn tất cả 1. Dim MyNumbers(4)AsInteger

2. MyNumbers(0) = 1

3. MyNumbers(1) = 2

4. MyNumbers(2) = 3

5. MyNumbers(3) = 4

6. MyNumbers(4) = 5

Để khai báo một mảng bạn cũng khai báo giống biến nhưng đằng sau tên của mảng hãy đóng mở ngoặc ( ) và ở giữa dấu ngoặc là số giá trị của mảng này.

Trong ví dụ trên bạn có thể thấy mảng MyNumbers được khai báo với 4. Bạn hãy nhớ rằng một mảng luôn được bắt đầu bằng giá trị 0, và vị trí đầu tiên của mảng cũng là 0.

Chúng ta hãy vào việc thực hành luôn để tìm hiểu về mảng: - Tạo một project mới.

- Thêm một Button lên form

- Thay đổi giá trị Text của Button thành "Integer Array" - Nhấn kép chuột lên Button và gõ đoạn code sau vào:

Số dòng Bật/Tắt | Mở rộng/Rút gọn | Chọn tất cả 1. Dim MyNumbers(4) As Integer

2. 3. MyNumbers(0) = 1 3. MyNumbers(0) = 1 4. MyNumbers(1) = 2 5. MyNumbers(2) = 3 6. MyNumbers(3) = 4 7. MyNumbers(4) = 5 8. (adsbygoogle = window.adsbygoogle || []).push({});

9. MsgBox("First Number is: "& MyNumbers(0)) 10. MsgBox("Second Number is: "& MyNumbers(1)) 11. MsgBox("Third Number is: "& MyNumbers(2)) 12. MsgBox("Fourth Number is: "& MyNumbers(3)) 13. MsgBox("Fifth Number is: "& MyNumbers(4))

Chạy thử chương trình. Khi nhấn vào Button bạn sẽ thấy những hộp thoại hiện lên. Khảo sát đoạn code:

- Đầu tiên ta khai báo là một mảng Integer với 5 giá trị. - Tiếp đến gán các giá trị cho mảng

3 - Khai báo lại mảng

Giả sử khi bạn viết code bạn muốn khai báo lại mảng vào một lúc nào đó và nhập các giá trị mới cho nó.

Hãy tìm hiểu việc này qua ví dụ sau:

- Vì không biết số giá trị của mảng nên ta hãy khai báo tên mảng và hai dấu ngoặc thôi:

Số dòng Bật/Tắt | Mở rộng/Rút gọn | Chọn tất cả 1. Dim numbers() As Integer

Tiếp đến để khai báo lại mảng ta sẽ dùng hàm ReDim:

Số dòng Bật/Tắt | Mở rộng/Rút gọn | Chọn tất cả 1. ReDim numbers(count)

Trong đó count là số giá trị của mảng mà bạn cần.

Chẳng hạn ta cần có 4 giá trị trong mảng numbers ta khai báo như sau:

Số dòng Bật/Tắt | Mở rộng/Rút gọn | Chọn tất cả 1. ReDim numbers(3)

Hãy khảo sát đoạn code này:

Số dòng Bật/Tắt | Mở rộng/Rút gọn | Chọn tất cả

1. Dim numbers() As Integer'Khai báo mảng numbers

2. ReDim numbers(3)'Khai báo lại mảng với 4 giá trị

3. 'Gán các giá trị cho mảng

4. numbers(0) = 1

5. numbers(1) = 2

6. numbers(2) = 3

7. numbers(3) = 4

Bạn có thể thấy sau các dấu ngoặc đơn ' là các dòng chú chú thích. Khi bạn viết chú thích cho mã trong VB thì hãy viết dấu ' và viết các chú thích phía sau dấu '. Lúc biên dịch VB sẽ bỏ qua những chú thích này

Tương tự như khai báo các mảng Integer các mảng String bạn cũng có thể gán các dòng chữ cho các mảng.

Một phần của tài liệu Giao trinh visual basic 2008x (Trang 41 - 43)