Đang chuẩn bị nút TẢI XUỐNG, xin hãy chờ
Tải xuống
3) Tạo đối tượng Command: o Xây dựng một đối tượng Command kết nối trực tiếp với Table (bảng) THANGHOA trong file dữ liệu HangHoa.mdb. o Nhấp chuột phải trên kết nối dữ liệu conHH & chọn Add Command; sửa Command Name là: comHH; chọn Table từ Combo Box Database Object, chọn THANGHOA từ Combo Box Object Name. o Trước khi đóng hộp thoại này, ta chuyển qua nhãn Advanced & thiết lập LockType là 3 – Optimistic (mặc nhiên là 1 – Read Only); Cursor Location: Use client-side cursor | Visual Basic Hình 12.3 Đối tượng Connection 3 Tạo đối tượng Command o Xây dựng một đối tượng Command kết nối trực tiếp với Table bảng THANGHOA trong file dữ liệu HangHoa.mdb. o Nhấp chuột phải trên kết nối dữ liệu conHH chọn Add Command sửa Command Name là comHH chọn Table từ Combo Box Database Object chọn THANGHOA từ Combo Box Object Name. o Trước khi đóng hộp thoại này ta chuyển qua nhãn Advanced thiết lập LockType là 3 - Optimistic mặc nhiên là 1 - Read Only Cursor Location Use client-side cursor. Nhờ vậy ta mới có thể cập nhật Record Set từ chương trình của ta. o Trở lại giao diện DED ta được Hình 12.4 Đối tượng Command Trang 144 Visual Basic 4 Tạo một ứng dụng nhập liệu với DED o Ở môi trường DED ta kéo các trường của Command comHH vào Form1 chỉnh sửa lại cho thích hợp. o Ở đây ta có sử dụng một lưới để hiển thị dữ liệu do vậy ta chọn Project Component chọn Microsoft DataGrid Control 6.0 OLE DB sau đó kéo điều khiển này vào Form thiết lập các thuộc tính cho thích hợp. Name grdHH. DataSource datHH DataMember comHH o Nhấp chuột phải lên điều khiển DataGrid chọn Retrieve Structure. Sau đó lưu dự án chạy chương trình ta được Thong tin hang hoa Mã háng BG01I Tên háng IBột giặt Omo DV Tĩnh Goi Mã loại 0005 Mã hãiHk Tên ItãiKi DVTinh MA loa ĩ Ju. AMŨ1 ão Sơ mi vải việt Tiến Cai 0004 ĩtỊiĩl BỌt giặt Omo Goi 0005 BLŨ1 Bàn lảm việc Cai 0003 BTŨ1 Bàn trang điểm Cai 0003 CM01 Cã mỏi hộp Hop 0001 DG01 Dâu gội Clear Chai 0006 DG02 Câu gội Sunsilk Chai 0006 MG01 Mi Aone Goi 0001 Nr .ììi Ni V Ị - mĩm HỔI Ci nn Qhai nnn-1 Hình 12.5 Form hiển thị table THangHoa o Thêm các nút hành động Thêm Sửa Xóa . . Chẳng hạn các sự kiện cmd_Them_Click cmdXoa_Click cmdLuu_Click cmdHuy_Click được xử lý Trang 145 Visual Basic Hình 12.6 Form nhập hoàn chỉnh cho table THangHoa Private Sub cmdThem_Click With datHH.rscomHH .AddNew End With End Sub Sub cmdXoaClick Private With datHH.rscomHH .Delete .Update Me.Refresh With End End Sub Private Sub cmdHuy_Click With datHH.rscomHH .CancelUpdate .
