求助：用VB与access数据库编写的求混合气体密度，绝热指数等的程序
求助各位高手，本人初学，现利用access建立了一些气体的密度，分子量及绝热指数等的数据库，在计算混合气体的分子量、密度等时不知道怎么访问一列数据并计算，求助高人写下代码，感激不尽！
这是我初编连接数据库想求取混合气体绝热指数表的程序，数据库名是“介质绝热指数表”，表名是“介质物性参数表”。
Dim rs As New ADODB.Recordset
Dim cnn As New ADODB.Connection
Private Sub Command3_Click()
Dim strsql As String
Dim db As Database
Set rs = Nothing
Set cnn = Nothing
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\往复式压缩机编程\往复机热动力计算编程\介质物性计算\介质绝热指数表.mdb;Persist Security Info=False"
cnn.Open
strsql = "select 绝热指数from介质物性参数表"
rs.Open strsql, cnn, adOpenStatic, adLockOptimistic‘此句运行时说至少一个参数没有被指定值
rs.MoveFirst
Do While Not rs.EOF
Print rs("绝热指数")
rs.MoveNext
Loop
End Sub
烦请给看一下，并帮忙完成求取混合气体绝热指数的代码。谢谢了！