II – Hoạt động của chương dùng cho User (tra cứu trên w
3. Các kiểu cấu trúc lặ p:
2.1 8 KIỂU BẢN GHI (RECORD) ĐỊNH NGHĨA :
Các kiểu dữ liệu bạn đã từng dùng như Byte, Integer, Long, String, … là những kiểu dữ liệu chuẩn do Visual Basic định nghĩa sẵn. Trong quá trình viết một chương trình, thường khi bạn muốn có những kiểu dữ liệu khác để có thể dễ dàng lưu trữ các thông tin của bạn. Trong trường hợp đó, Visual Basic cho bạn có thể định nghĩa thêm những kiểu dữ liệu mới. Thường những kiểu dữ liệu mới bạn định nghĩa nên được tạo thành từ các kiểu dữ liệu chuẩn.
Ví dụ trong một chương trình bạn cần lưu các thông tin về các nhân viên trong một công ty nào đó để xử lý. Mỗi nhân viên cần lưu các thông tin Họ Tên, tuổi, nghề nghiệp, Địa chỉ, nếu trong trường hợp này mà bạn khai báo 4 biến trong mỗi nhân viên, bạn cần phải có đến 40 biến. Rõ ràng trong trường hợp có quá nhiều biến như thế này bạn không thể nào quản lý nổi và nó làm cho công việc lập trình rời rạc và cực kỳ khó khăn. Trong trường hợp này bạn có thể định nghĩa một kiểu dữ liệu mới để có thể lưu cùng lúc 4 thông tin mà bạn muốn trên bằng cách khai báo như thế này : Type nhanvien hoten As string*25 tuoi As Integer nghenghiep As String*20 diachi As string*40 End Type
Khi khai báo như vậy có nghĩa là bạn định nghĩa nên một kiểu dữ liệu mới có tên là nhanvien, trong kiểu này có các thành phần con là hoten kiểu chuỗi có 25 ký tự, tuoi kiểu số nguyên, nghề nghiệp kiểu chuỗi 20 ký tụ, diachi kiểu chuỗi 40 ký tự. Các thành phần khai báo trong kiểu gọi là các trường dữ liệu (field) của nó. Như vậy kiểu nhân viên là kiểu có 4 trường con.
Khi bạn viết như trên là bạn chỉ mới định nghĩa ra một kiểu dữ liệu chứ chưa tạo ra bất kỳ một biến nào trong chương trình. Khi định nghĩa một kiểu dữ liệu bạn có thể khai báo bất kỳ biến nào có kiểu đó. Ví dụ :
Dim nguoi As nhanvien
Như vậy biến người cũng sẽ có 4 trường hoten, tuoi, nghenghiep và diachi. Kích thước mà biến này chiếm trong bộ nhớ bằng tổng các kích thước của các trường trong kiểu dữ liệu đó. (ở đây biến nguoi sẽ chiếm hết 25 + 2 + 20 + 40 = 87 byte trong bộ nhớ).
Kiểu dữ liệu như kiểu nhanvien trên gọi là kiểu bản ghi (record). Như vậy để định nghĩa một kiểu bản ghi mới bạn dùng cú pháp:
[Public/Private] Type tên kiểu <khai báo các trường>
Bạn có thể đặt từ khóa Public hay Private trước từ khóa Type để qui định kiểu này dùng chung cho cả project hay chỉ trong modul hiện thời. Nếu không ghi gì cả cũng có nghĩa là Public.
Để truy xuất các trường trong một biến kiểu bản ghi, bạn ghi giống như truy xuất property trong một đối tượng. Ví dụ chúng ta định nghĩa kiểu nhan vien như trên:
Dim nguoi As nhanvien
nguoi.hoten = “Nguyen Van A” nguoi.tuoi = 35
nguoi.nghenghiep = “Giam Doc” nguoi.diachi = “Trung Tam Tinh Hoc”
Bạn cũng có thể khai báo một mảng các kiểu bản ghi. Ví dụ:
Dim coquan(1 to 20) As nhanvien coquan(1).hoten = “Nguyen Van A”
2.19 - LỆNH EXIT.
Lệnh này dùng để thoát khỏi một cấu trúc lặp nào đó hay một thủ tục nào đó. Nó có nhiều cú pháp :
Lệnh Exit Do : Lệnh này dùng để thoát khỏa vòng lặp Do. . . While hiện thời.
Lệnh Exit For: Lệnh này dùng để thoát khỏi vòng lặp For. . . Next hiện thời.
Lệnh Exit Sub : Lệnh này dùng để thoát khỏi thủ tục hiện thời.