1 Mục lục 1 2 Làm quen với visual basic 0 9



tải về 1.69 Mb.
trang9/39
Chuyển đổi dữ liệu09.10.2016
Kích1.69 Mb.
#32631
1   ...   5   6   7   8   9   10   11   12   ...   39

5.5Hàm và thủ tục


    • Chia nhỏ chương trình thành nhiều phần logic, giúp gỡ rối dễ dàng.

    • Thủ tục có thể được sử dụng lại trong một ứng dụng khác.

Các loại thủ tục

  1. Thủ tục không trả về giá trị

[Private | Public | Static] Sub (Tham số)

Các dòng lệnh

End sub


  1. Hàm luôn trả về giá trị:

[Private | Public | Static] Function (Tham số) [As ]

Các dòng lệnh

End Function

Trong trường hợp không khai báo As , mặc định, VB hiểu là kiểu variant



  1. Thủ tục thuộc tính

Có thể trả về và gán giá trị, hay đặt tham chiếu đến đối tượng.

Xem thủ tục trong modul hiện hành

Trong cửa sổ code, chọn Genaral trong hộp Object, và chọn tên thủ tục trong hộp Procedure.

Để xem thủ tục xử lý sự kiện chọn tên đối tượng từ hộp Object trong cửa sổ code, sau đó chọn tên sự kiện trong hộp procedure

Thoát khỏi thủ tục / hàm

Exit sub dùng để thoát khỏi thủ tục, Exit Function dùng để thoát khỏi hàm.

5.6Cấu trúc điều khiển

5.6.1Cấu trúc chọn


So sánh mặc định trong Visual basic mặc định là so sánh có phân biệt cỡ chữ. Nếu muốn tắt chế độ này, ta thêm dòng khai báo sau vào chương tình

Option Copare Text

Nếu muốn trả về trạng thái ban đầu, có 2 cách:

Đưa dòng khai báo:

Option Compare Binary

Chỉ cần xoá dòng khai báo “Option Compare Text”

Các biểu thức so sánh


Ký hiệu

Ý nghĩa

=

Bằng

<>

Khác

>

Lớn hơn

<

Nhỏ hơn

>=

Lớn hơn hoặc bằng

<=

Nhỏ hơn hoặc bằng

5.6.1.1If.. Then


Một dòng lệnh

If <điều kiện> Then

Nhiều dòng lệnh

If <điều kiện> Then



End if


Điều kiện là một so sánh hay một biểu thức mang giá trị số. Visual basic thông dịch giá trị này thành True / False. Nếu True thì Visual basic thi hành dòng lệnh sau từ khoá Then.

5.6.1.2If.. Then...Else


If <điều kiện 1> Then

[Khối lệnh - 1]

ElseIf <điều kiện 2> Then

[Khối lệnh - 2]

......

Else


[Khối lệnh - n]

End if

5.6.1.3Select Case


Giải quyết trường hợp có quá nhiều ElseIf được dùng, giúp chương trình sáng sủa dễ đọc. Biểu thức để so sánh được tính toán một lần vào đầu cấu trúc. Sau đó Visual basic so sánh kết quả biểu thức với từng Case. Nếu bằng nó thi hành khối lệnh trong Case đó.
Select Case

Case

Khối lệnh 1

Case

Khối lệnh 2

....................

Case else

Khối lệnh n

End Select

Mỗi danh sách biểu thức chứa một hoặc nhiều giá trị, các giá trị cách nhau bằng dấu phảy. Mỗi khối lệnh có thể chứa từ 0 đến nhiều dòng lệnh. Nếu có hơn một Case thoả mãn điều kiện thì Case đầu tiên được thực hiện. Case else không nhất thiết phải có, dùng trong trường hợp còn lại của các Case trước.


5.6.2Cấu trúc lặp

5.6.2.1Do..loop


Thi hành một khối lệnh với số lần lặp không định trước, tỏng đó, một biểu thức điều kiện dùng so sánh để quyết định vòng lặp có tiếp tục hay không. điều kiện phải quy về False hoặc True.

Kiểu 1:


Do While <điều kiện>

Loop


Kiểu 2:Vòng lặp luôn có ít nhất một lần thi hành khối lệnh

Do

Loop While <điều kiện>

Kiểu 3: Lặp trong khi điều kiện là False

Do until <điều kiện>

Loop


Kiểu 4: Lặp trong khi điều kiện là False và có ít nhất một lần thi hành khối lệnh

Do

Loop Until

5.6.2.2For...Next


Biết trước số lần lặp. Ta dùng biến đếm tăng dần hoặc giảm dần trong vòng lặp.

For = <điểm đầu> To <điểm cuối> [Step ]



Next []

Biến đếm, điểm đầu, điểm cuối và bước nhảy là những giá trị số.

Bước nhảy có thể là âm hoặc dương. Nếu bước nhảy là dương, điểm đầu phải nhỏ hơn hoặc bằng điểm cuối, nếu bước nhảy là âm thì ngược lại.


5.6.2.3For Each...Next


Tương tự vòng lặp For... Next, nhưng nó lặp khối lệnh theo số phần tử của một tập các đối tượng hay một mảng thay vì theo số lần lặp xác định. Vòng lặp này tiện lợi khi ta không biết chính xác bao nhiêu phần tử trong tập hợp.

For Each


In

Next


5.6.2.4Vòng lặp While...Wend


Tương tự vòng lặp Do...While, nhưng ta khôing thể thoát vòng lặp bằng lệnh Exit. Vì vậy, vòng lặp kiểu này chỉ thoát khi biểu thức điều kiện sai.

While <điều kiện>



Wend

5.6.2.5Câu lệnh GoTo


Được dùng cho bẫy lỗi.

On Error Goto ErrorHandler

Khi có lỗi, chương trình sẽ nhảy đến nhãn ErrorHandler và thi hành lệnh ở đó

5.6.3Làm việc với cấu trúc


Ta có thể lồng các cấu trúc với nhau ví dụ có thể lồng nhiều vòng For Nẽex với nhau. Để thoát khỏi cấu trúc ta dùng lệnh Exit, Exit for cho phép thoát khỏi vòng For, Exit do cho phép thoát khỏi Do loop.



tải về 1.69 Mb.

Chia sẻ với bạn bè của bạn:
1   ...   5   6   7   8   9   10   11   12   ...   39




Cơ sở dữ liệu được bảo vệ bởi bản quyền ©hocday.com 2024
được sử dụng cho việc quản lý

    Quê hương