VB中以execl为数据应该怎么样操作

来源:百度知道 编辑:UC知道 时间:2024/06/18 07:22:12
VB中以execl为数据应该怎么样操作,要详细点的。
adodc 和 datagrid 用sql来操作。
用sql的方式进行查改删。

用ado操作excel对象

不过你要怎么操作excel,也要说清楚
代码例子:

Private Sub Command1_Click()
' Dim dbTest As New Database
Dim rdTest As New Recordset
If Right(App.Path, 1) = "\" Then
Set dbTest = OpenDatabase(App.Path + "diary.mdb")
Else
Set dbTest = OpenDatabase(App.Path + "\diary\diary.mdb")
End If
Set rdTest = dbTest.OpenRecordset("a表")
rdTest.AddNew

rdTest("文档内容").AppendChunk txtWrite.TextRTF
rdTest.Update

End Sub

Private Sub Form_Load()
Dim cn As New ADODB.Connection, rs As New ADODB.Recordset
cn.CursorLocation = adUseClient
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & App.Path & "\temp.xls;Extended Properties='Excel 8.0;HDR=Yes'"
rs.Open "select * from [Sheet1$]",