Bạn muốn liên kết Excel với VB để thực hiện quản lý tính công nhân viên, bạn nên dùng thêm ADODB để phục vụ mục đích truy vấn sau nầy.
* Ta có thể dùng các TextBox để nhập dữ liệu
* ta cũng có thể dùng các TextBox Bind với recordset để hiển thị giá trị các record
Nếu bạn đọc thông thạo ADODB (tác giả Lê văn Duyệt forum nầy có viết), bạn sẽ thực hiện việc thêm, sửa, xóa, truy vấn... trên file dữ liệu xls.
Tôi tạm gởi bạn project VB6 có sẵn, dùng csdl là xls, project có dùng datagrid, và chèn thư viện MS ActiveX data Object 2.8 library. Code đơn giản, đại loại như sau, bạn có thể sửa lại theo ý mình:
Mã:
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Private Sub Command1_Click()
rs.AddNew
Command1.Caption = "Gõ vào DataGrid, xong nhân nút Lu'u"
Command2.Visible = True
End Sub
Private Sub Command2_Click()
rs.Update
Command1.Caption = "Thêm"
Command2.Visible = False
End Sub
Private Sub Form_Load()
cn.Open "Provider= Microsoft.Jet.OLEDB.4.0; data source=" & App.Path & "\Book1.xls;" & _
"Extended Properties=Excel 8.0;"
rs.CursorLocation = adUseClient
[COLOR=#ff0000]rs.Open "select * from [sheet1$]", cn, 3, 3[/COLOR]
Set DataGrid1.DataSource = rs
End Sub
Anh em nào nghé qua bài này xin giải thích dùm thêm cho dòng code bôi đỏ. Mình cũng đã đọc và tìm hiểu về SQL nhưng còn cụ thể dòng code đó thật muốn hiểu hơn.!!!
