Định nghĩa sử dụng kiểu liệu - Kiểu ghi Định nghĩa sử dụng kiểu liệu - Kiểu ghi Bởi: Khoa CNTT ĐHSP KT Hưng Yên Thực hành: Định nghĩa kiểu liệu để biến thuộc kiểu liệu lưu trữ thông tin sách (Tên sách, Tên tác giả, năm xuất bản, giá) Hướng dẫn: Kiểu liệu nên định nghĩa Module, định nghĩa Form dạng Private (tức sử dụng cục Form) mà dạng Public (Sử dụng Form) Minh hoạ: Tạo module mới: Vào menu Project → Add Module Lưu module với tên : modDataTypes.bAs Gõ đoạn lệnh vào module vừa tạo: Option Explicit '/// Định nghĩa kiểu liệu : KieuSach Public Type KieuSach TenSach As String TacGia As String NamXB AsInteger Gia As Single End Type Gõ đoạn lệnh thủ tục Form_Load: Option Explicit 1/2 Định nghĩa sử dụng kiểu liệu - Kiểu ghi Dim Sach As KieuSach Dim KhoSach(100) As KieuSach Private SubForm_Load() Sach.TenSach = "Lập trình VB thật đơn giản" Sach.TacGia = "Software Team - UTEHY" Sach.NamXB = 2006 Sach.Gia = 45000 '/// Gán số giá trị cho phần tử có số cho mảng KhoSach(1).TenSach = "Bài tập Visual Basic" KhoSach(1).TacGia = "Software Team - UTEHY" KhoSach(1).NamXB = 2006 KhoSach(1).Gia = 34500 MsgBox Sach.TenSach & " giá : " & Sach.Gia MsgBox KhoSach(1).TenSach & " Giá : " & KhoSach(1).Gia End sub • Ghi chú: • Đoạn chương trình định nghĩa kiểu ghi (tương tự Record PAscal hay struct C/C++) câu lệnh Type, từ khoá Public đứng trước để kiểu liệu dùng Form, module Còn sử dụng từ khoá Private thay Public kiểu liệu sử dụng module mà • Đoạn code khai báo biến thuộc kiểu liệu vừa định nghĩa Một biến thông thường, biến thứ hai mảng ? Kiểu liệu mảng thường thao tác kết hợp với vòng lặp Các ví dụ thêm mảng kết hợp với vòng lặp đề cập phần tiếp sau 2/2