Giáo trinh Visual Basic part 10

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....
Nội dung trích xuất từ tài liệu:
Giáo trinh Visual Basic part 10 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ửaCommand Name là: comHH; chọn Table từ Combo Box Database Object, chọnTHANGHOA 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ậpLockType là 3 – Optimistic (mặc nhiên là 1 – Read Only); Cursor Location: Useclient-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ọnProjectComponent; chọn Microsoft DataGrid Control 6.0 (OLE DB); sau đó kéo điềukhiể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: 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ệncmd_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 THangHoaPrivate Sub cmdThem_Click() With datHH.rscomHH .AddNew End WithEnd SubPrivate Sub cmdXoa_Click() With datHH.rscomHH .Delete .Update Me.Refresh End WithEnd SubPrivate Sub cmdHuy_Click() With datHH.rscomHH .CancelUpdate Me.Refresh End WithEnd SubPrivate Sub cmdLuu_Click() On Error GoTo Xuly With datHH.rscomHH .Update End With Me.Refresh Trang 146 Visual Basic Exit Sub Xuly: MsgBox Err.Description, vbCritical + vbSystemModal, Error End Sub Như vậy, ta đã thiết kế xong một Form cho phép hiển thị thông tin các hàng hóa, Form này cho phép sửa đổi, thêm mới các mẩu tin trong bảng THANGHOA của CSDL HANGHOA.MDB. 5) Đối tượng Command sử dụng câu lệnh SQL o Ta có thể thiết kế các câu lệnh SQL cách nhanh chóng nhờ sử dụng trình SQL Builder. o Với trình DataEnvironment trên, ta thêm một đối tượng Command nữa;nhưng đối tượng Command này lấy dữ liệu từ câu lệnh SQL. Ở đây, ta cần hiển thịthông tin về các loại hàng hóa & tên loại hàng tương ứng. o Sau khi thêm một đối tượng Command vào, ta sửa các thuộc tính như sau: Name: comHH_Loai Source of Data : SQL Statement. o Sau đó chọn SQL Builder trong cửa sổ thuộc tính; một cửa sổ hiện ra. Kéobảng THangHoa & TLoaiHang trong cửa sổ DataView vào khung Diagram của trìnhSQL Builder. Check chọn các trường tương ứng (MaHang, TenHang, DVTinh,TenLoai). Ta được kết quả sau (hình dưới). o Đóng cửa sổ này lại; ta được một đối tượng Command mới. Trang 147 Visual Basic DiagramSQL Hình 12.7: Cửa sổ SQL Builder Trang 148 Visual Basic Chương 13: THIẾT LẬP BÁO CÁOMục tiêu: Chương này giới thiệu cách thức để tạo báo cáo bao gồm hiển thị dữliệu cũng như sắp xếp và phân nhóm dữ liệu.Học xong chương này, sinh viên có thể: o Sử dụng tính năng Report của Microsoft Access trong các ứng dụngnhỏ. o Sử dụng Data Report để tạo báo biểu. o Sử dụng Crystal Report, công cụ mạnh để tạo báo biểu.Kiến thức cần thiết: - Thư viện đối tượng ActiveX Data Objects (ADO). - Môi trường dữ liệu Data Environment.Tài liệu tham khảo: Visual Basic 6.0 và Lập trình cơ sở dữ liệu - Chương 21, trang 637 -Nguyễn Thị Ngọc Mai (chủ biên) – Nhà xuất bản Giáo dục - 2001. Trang 149 Visual BasicI. SỬ DỤNG MICROSOFT ACCESS ĐỂ LẬP BÁO CÁO Có hai kỹ thuật để thi hành một báo cáo Access từ ứng dụng VB: - Sử dụng Automation để phóng một thể hiện (instance) của Microsoft ...