Bài giảng lập trình trực quan bài 4 datagrid

1, Đưa DataGrid vào ứng dụng :- DataGrid là một ActiveX, do vậy phải thêm qua hộp thoại Components - Điều khiển : Microsoft DataGrid Control 6.0 - Chứa trong tập tin : MSDATGRD.OCX 2, Th

1, Đưa DataGrid vào ứng dụng :

- DataGrid là một ActiveX, do vậy phải thêm qua hộp thoại

Components

- Điều khiển : Microsoft DataGrid Control 6.0

- Chứa trong tập tin : MSDATGRD.OCX

2, Thiết kế lại DataGrid : bằng cách click phải chuột lên

DataGrid và chọn mục Edit trên ShortCut menu.

-Click phải chuột lần nữa để chọn kiểu sửa chữa ( Delete, Insert, Append)

- Hay thay đổi độ rộng các cột bằng chuột khi thấy xuất hiện con trỏ 

3, Liên kết RecordSet với DataGrid :

Ta liên kết qua thuộc tính DataSource :

Set < Tên DataGrid>.DataSource = Recordset

4, Truy xuất giá trị của một ô trên DataGrid :

4.1, Dùng thuộc tính Col và Row Qua thuộc tính Text để lấy

nội dung

VD : Lấy nội dung của ô ở cột 3, dòng 4

DataGrid1.Col = 2 DataGrid1.Row = 3 MsgBox DataGrid1.Text

4, Truy xuất trị của một ô trên DataGrid :

4.2, Sử dụng thuộc tính Bookmark và tên Field.

VD : Muốn lấy dòng có Bookmark là bmk, tên field của

recordset là rstA nối kết với cột muốn lấy giá trị là tennv

DataGrid1.Bookmark = bmk MsgBox rstA(“Tennv”).Value 4.3, Sử dụng thuộc tính Text, Value của Columns(<số>) để

lấy nội dung dòng hiện hành :

VD : Lấy nội dung cột 3 của dòng hiện hành

MsgBox DataGrid1.Columns(2).Text (gTrị hiển thị)

MsgBox DataGrid1.Columns(2).Value (gTrị lưu trữ)

1, Các thuộc tính dữ liệu của DataList và DataCombo :

1.1, Các thuộc tính dùng khi muốn cập nhật dữ liệu :

- DataSource : chứa recordset nguồn

- DataField : chứa Field ( trường dữ liệu)

1.2, Các thuộc tính hiển thị dữ liệu

- RowSource : chứa nội dung các mẩu tin

- ListField : chọn trường hiển thị nội dung

- BoundColumn : cột nội dung lưu trữ ( không hiển thị)

- BoundText : nội dung lưu trữ ( không hiển thị)

2, Ví dụ với DataCombo1 : lấy dữ liệu trong bảng Khoa

rsKhoa.Open "Khoa", cnn, adOpenStatic, adLockReadOnly, _ adCmdTable

Set cboKhoa.RowSource = rsKhoa

cboKhoa.ListField = "TenKhoa"

cboKhoa.BoundColumn = "MaKhoa"

Kết quả : ví dụ chọn [ Hoá ]

cboKhoa.Text = “Hoá”

cboKhoa.BoundText = “HH”

cboKhoa.ListField = “TenKhoa”

cboKhoa.BoundColumn = “MaKhoa”

3, Ví dụ với DataList : hiển thị tên SV trong khoa

sql = "select * from sinhvien where makhoa='" & _ cboKhoa.BoundText & "'“

If rsSV.State <> adStateClosed Then rsSV.Close

rsSV.Open sql, cnn, adOpenStatic, adLockOptimistic, _

adCmdText

Set lstSV.RowSource = rsSV

lstSV.ListField = "HoTen"

ComboBox

ListBox

4, Cập Nhật dữ liệu qua DataList và DataCombo :

- Chú ý phải nhập đầy đủ thông tin các thuộc tính dữ

liệu : DataSource, DataField, RowSource, LisstField,

BoundColumn.

-Thứ tự đặt giá trị các thuộc tính cho điều khiển :

+ Mở RecordSet cho DataSource (nếu có)

+ Mở RecordSet cho RowSource

+ Đặt các giá trị cho DataSource và DataField

+ Đặt giá trị cho RowSource, ListField, BoundColumn