Bài giảng Microsoft Visual Basic: Bài 3 - Trường Đại học Kinh tế

MICROSOFT VISUAL BASIC<br /> Bài 3 : Sử dụng DataCombo, DataList và DataGrid<br /> I, Sử dụng DataGrid hiển thị dữ liệu<br /> 1, Thiết lập DataGrid trên Form<br /> 2, Kết nối DataGrid với nguồn dữ liệu<br /> 3, Truy xuất nội dung trên DataGrid<br /> <br /> II, Sử dụng DataCombo và DataList<br /> 1, Giới thiệu<br /> 2, Chương trình ứng dụng<br /> <br /> Menu<br /> 1, Thiết lập DataGrid trên Form<br /> a, Đưa DataGrid vào ứng dụng :<br /> DataGrid là một điều khiển ActiveX, nên muốn sử dụng chúng ta phải đưa<br /> vào ứng dụng thông qua chức năng Project – Components –<br /> Microsoft DataGrid Control 6.0...<br /> Điều khiển này chứa trong tập tin MSDATGRD.OCX<br /> <br /> Tiếp<br /> <br /> Menu<br /> <br /> Về<br /> <br /> 1, Thiết lập DataGrid trên Form<br /> b, Thiết kế lại DataGrid<br /> DataGrid khi đưa vào form mặc định chỉ có hai cột, muốn tăng giảm cột ta có<br /> thể làm như sau :<br /> <br /> + nhấn chuột phải trên DataGrid và chọn Edit trên shortcut menu<br /> + Sau đó, nhấn chuột phải lần thứ hai trên DataGrid<br /> Delete : để xoá cột đang được chọn trên DataGrid<br /> Insert : để chèn thêm một cột vào trước cột đang được chọn trên DataGrid<br /> Append : thêm một cột vào vị trí sau cùng trên DataGrid<br /> Có thể định độ rộng của cột bằng chuột khi thấy xuất hiện con trỏ sau <br /> <br /> Menu<br /> 2, Kết nối DataGrid với nguồn dữ liệu<br /> Ta liên kết DataGrid với Recordset qua thuộc tính Datsource :<br /> Set .DataSource = <br /> Ví dụ : Dùng DataGrid hiển thị nội dung của bảng sinhvien<br /> Dim rsSinhVien As New ADODB.Recordset<br /> Sub LayNguonSinhVien()<br /> If rsSinhVien.State = 1 Then rsSinhVien.Close<br /> sql = "SINHVIEN"<br /> rsSinhVien.Open sql, cnn, 3, 3<br /> Set DataGrid1.DataSource = rsSinhVien<br /> End Sub<br /> <br /> Private Sub Form_Load()<br /> Call Mo_CSDL<br /> Call LayNguonSinhVien<br /> End Sub<br /> <br /> Menu<br /> <br /> Tiếp<br /> <br /> 3, Truy xuất nội dung trên DataGrid<br /> a, Cách 1:<br /> Trước khi lấy nội dung của một ô bất kỳ trên DataGrid, ta dùng thuộc tính<br /> Col và Row để chuyển ô hiện hành trên DataGrid đến ô muốn lấy nội<br /> dung và dùng thuộc tính Text để lấy nội dung.<br /> (lưu ý cột, dòng đánh số từ 0)<br /> Ví dụ : Muốn lấy trị của ô ở cột thứ 3, dòng thứ 4<br /> DataGrid1.Col = 2<br /> DataGrid1.Row = 3<br /> MsgBox DataGrid1.Text<br /> <br />