VB  ado ACCESS库
J.MDB库中有一张名为“费用表”的表
表的字段如下
ID 工号 姓名 手术费 药费 
第一个字段是 'ID'，自动编号的。

代码如下：
Dim Conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim sql As String
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\J.MDB"

sql = "insert into 费用表(工号,姓名,手术费,药费)values('" & Text1.Text & " ','" & Text2.Text & " ','" & Text3.Text & "','" & Text4.Text & "') "
'sql = "insert into 费用表((工号,姓名,手术费,药费)values('105','小王','100','50')"
Conn.Execute sql
'运行完以上语句之后，就会添加一条记录，

'----------------------- 然后我想用获得 MAX(ID)的方式获得自动编号的值，如下
sql = "select max(ID) from 费用表"
rs.Open sql, 1, 3
但是在 rs.Open sql, 1, 3 处总是提示：
参数类型不正确，或不在可接受的范围内，或与其它参数冲突


第一个字段是 'ID'，自动编号的。
请问如何马上获得ID的值???