I. BÀI TẬP HƯỚNG DẪN
SỬ DỤNG DATA CONTROL
THÍ DỤ VỀ SỬ DỤNG DAO
Bài tập này nhằm mục đích giới thiệu về cách thức sử dụng điều khiển dữ liệu và thư viện DAO trong việc thiết kế một Form nhập liệu hoàn chỉnh cho bảng THangHoa trong CSDL HangHoa.mdb. Giao diện cùng với mã lệnh chỉ mang tính chất gợi ý; sinh viên có thể thực hiện theo ý riêng của mình.
Bước 1: Thiết kế form như sau:
+ * Hình IV.13: Sử dụng Data Control Với *: DataControl: Điều khiển dữ liệu DatabaseName: HangHoa.MDB RecordSource: THangHoa Name: datHH
Bước 2: Thiết lập các thuộc tính cho các TextBox & ComboBox. DataSource: DatHH
DataField:
Bước 3:Đặt điều khiển lưới lên Form (+) sau khi đã tham chiếu đến nó (Project\Components\Microsoft Data Bound Grid Control 5.0 SP3). DataSource: datHH
Trang 76
Bước 4: Sự kiện cmdThem_Click Private Sub cmdThem_Click() datHH.Recordset.AddNew DoiTThai False
End Sub Trong đó:
Private Sub DoiTThai(ByVal TThai As Boolean) cmdThem.Enabled = TThai
cmdSua.Enabled = TThai cmdXoa.Enabled = TThai cmdHuy.Enabled = Not TThai cmdLuu.Enabled = Not TThai End Sub
Bước 4: Sự kiện cmdSua_Click & sự kiện cmdXoa_Click: Private Sub cmdSua_Click()
datHH.Recordset.Edit DoiTThai False End Sub
Private Sub cmdXoa_Click() On Error GoTo Xuly datHH.Recordset.Delete Exit Sub
Xuly:
MsgBox Err.Description, vbCritical + vbSystemModal, "Loi" End Sub
Bước 5: Sự kiện cmdLuu_Click & cmdHuy_Click Private Sub cmdHuy_Click()
'dathh.Database =
datHH.Recordset.CancelUpdate DoiTThai True
End Sub
Private Sub cmdLuu_Click() datHH.Recordset.Update DoiTThai True
End Sub
Bước 6: Sự kiện Form_Load: Private Sub Form_Load() DoiTThai True
- Có nhận xét gì nếu khi chạy chương trình, ta thêm mới một mẩu tin có khóa là Mahang trùng với một MaHang đã có. Để giái quyết ta làm thế nào?
II. BÀI TẬP TỰ LÀM
Sử dụng CSDL HangHoa.mdb, anh (chị) hãy:
1) Cải tiến Form nhập ở bài 4-4, sao cho trường MaLoai phải được lấy từ các MaLoai
của bảng TLoaiHang. Hơn nữa thay vì hiển thị MaLoai, ta hiển thị TenLoai cho dễ
theo dõi; nhưng khi thêm vào bảng THangHoa, ta lại thêm vào MaLoai của TenLoai
đó.
2) Bằng cách sử dụng DAO (tương tự 4-3), anh (chị) hãy: a. Thiết kế Form nhập liệu cho bảng THANGHOA. b. Thiết kế Form nhập liệu cho bảng TNHANVIEN.
Trang 78