Question

您是怎么解决vb6获取access数据库中某列数据的最大值得啊，高人指点下吧

Answer 1

假设：你已经建立了到数据库的ADO连接cnn
现在要查询：数据库“产品资料表”中“产品单价”（位于表的第4列）的最大值。
那么：利用下面代码可以查询到产品单价的最大值。
注意：由于“产品单价”位于第4列，所以用 rst(3) 取值。
rst() 括号中的数值从0开始，0、1、2 ... 分别对应表的第1、2、3 ... 列。

Dim rst As New ADODB.Recordset
rst.Open "SELECT TOP 1 * FROM 产品资料表 ORDER BY Val([产品单价]) DESC;", cnn, 3, 3
MsgBox rst(3)
rst.Close
Set rst = Nothing

追问

高手您可以修改下我前面一个同样的问题嘛，是修改我的代码的，谢谢您啦