在线等!编程高手进来看下:vba的问题 解决问题追加分数!

来源:百度知道 编辑:UC知道 时间:2024/06/19 05:27:36
麻烦解释下列语句的意思,我知道是链接工作簿的过程,但对于单独每一行的具体含义不是很了解。
With cnn
.Provider = "microsoft.jet.oledb.4.0"
.ConnectionString = "Extended Properties=Excel 8.0;" _
& "Data Source=" & ThisWorkbook.FullName
.Open
End With

下面的程序是什么意思?
Set rs = New ADODB.Recordset
rs.Open Sql, cnn, adOpenKeyset, adLockOptimistic

还有在以下语句中,为什么要用到&符号和$符号?
Sql = "select * from [" & myWorkName & "$]

With cnn
‘加载驱动
.Provider = "microsoft.jet.oledb.4.0" 、
’扩展属性
.ConnectionString = "Extended Properties=Excel 8.0;" _

’链接工作簿的名字
& "Data Source=" & ThisWorkbook.FullName
.Open ‘打开操作
End With

下面的程序是什么意思?
Set rs = New ADODB.Recordset
rs.Open Sql, cnn, adOpenKeyset, adLockOptimistic

这句话就是用SQL查询,讲结果集返回给rs,如果有异常的情况会跑出来,要注意捕获。adOpenKeyset, adLockOptimistic 这是两个常量参数,可以用可以不用,具体什么意思你去查,我忘记了。

还有在以下语句中,为什么要用到&符号和$符号?
Sql = "select * from [" & myWorkName & "$]

& 是连接字符串,$ 不知道

Set rs = New ADODB.Recordset
rs.Open Sql, cnn, adOpenKeyset, adLockOptimistic

设置 rs为 ADODB.Recordset结构体
rs.open 为rs的open方法

& 为连接2个字符串
你要看sql的语法和vba的语法就知道了。