Lớp xử lý nghiệp vụ gồm các thành phần của riêng lớp đĩ.
Với mỗi bảng trong CSDL, cần xây dựng một lớp xử lý tương ứng với các điểm cần lưu ý:
Lớp kế thừa từ lớp XL_BANG
Lớp cĩ hàm khởi tạo và tìm kiếm thơng tin
III.1. Khai báo phương thức khởi tạo
Nhĩm này cĩ các phương thức khởi tạo khác nhau.
Ví dụ: Lớp xử lý nghiệp vụ XL_DIEN_VIEN Imports System.Data
Imports System.Data.OleDb Public Class XL_DIEN_VIEN Inherits XL_BANG
#Region " Khai báo phương thức khởi tạo " ' Khởi tạo tồn bộ danh sách diễn viên Public Sub New()
MyBase.New("DIEN_VIEN", "Select * From DIEN_VIEN") End Sub
' Khởi tạo thơng tin diễn viên theo khĩa chính Public Sub New(ByVal pMDV As Int32)
MyBase.New("DIEN_VIEN", "Select * From DIEN_VIEN Where MDV = " & pMDV) End Sub
' Khởi tạo danh sách diễn viên theo điều kiện Public Sub New(ByVal pChuoi_SQL As String) MyBase.New("DIEN_VIEN", pChuoi_SQL) End Sub
#End Region …
End Class
III.2. Khai báo phương thức tìm kiếm thơng tin
Dựa vào các yêu cầu tìm kiếm thơng tin lập biểu thức lọc để xác định các dịng thoảđiều kiện tìm:
Ví dụ: XL_DIEN_VIEN: Phương thức tìm kiếm thơng tin
#Region " Khai báo phương thức xử lý tìm kiếm thơng tin " Public Sub Tim(ByVal pDong_dieu_kien As DataRow)
Dim chuoi_Dk As String = "" Dim mang_Dk As New ArrayList Dim so_Pt As Byte = 0
If Not IsDBNull(pDong_dieu_kien("Ho_ten_dv")) Then mang_Dk.Add("Ho_ten_dv LIKE '" & _
pDong_dieu_kien("Ho_ten_dv") & "*'") End If
'Tiếp theo cho những điều kiện khác … If mang_Dk.Count > 0 Then Dim i As Integer For i = 0 To mang_Dk.Count - 1 If i = 0 Then chuoi_Dk = mang_Dk(i) Else
chuoi_Dk += " AND " + mang_Dk(i)
End If Next Loc_du_lieu(chuoi_Dk) End If End Sub #End Region
Bài 8
THIẾT KẾ CÁC MÀN HÌNH
Tĩm tắt
Lý thuyết 6 tiết - Thực hành 15 tiết
Mục tiêu Các mục chính Bài tập (adsbygoogle = window.adsbygoogle || []).push({});
Bài học này giúp cho học viên thiết kế và cài đặt các dạng màn hình cơ
bản trong ứng dụng Visual Basic
4. Các điều khiển hiển thị dữ liệu 5. Màn hình đơn 6. Màn hình một nhiều 7. Màn hình lọc theo điều kiện 8. Màn hình một nhiều nhiều 9. Một số kỹ thuật trong hiển thị dữ liệu 5.6, 5.7, 5.8, 5.9, 5.10, 5.11, 5.12, 5.14 Bài làm thêm: 5.13