主题：[求助] 代码修改

参考 http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=69632

 

你说的上一行，根据哪一列排序的？

 

cmd1.CommandText = "Select top 1 实际示数 From {气表抄表} Where 编号 = '" & bh & "' order by [_Identify] desc"

msgbox(cmd1.ExecuteScalar())

那就试试

 

cmd1.CommandText = "Select top 1 实际示数 From {气表抄表} Where 编号 = '" & bh & "' order by 实际示数 desc"

msgbox(cmd1.ExecuteScalar())

 

-----------------

 

cmd1.CommandText = "Select top 2 实际示数 From {气表抄表} Where 编号 = '" & bh & "' order by 实际示数 desc"

msgbox(cmd1.ExecuteReader.datarows(1)("实际示数"))

cmd1.CommandText ="Select Max(数值) From {实时数据} Where 编号 = '" & bh & "' And 抄表时间 >= '" & dy1 & "' And 抄表时间 < '" & dy1.addmonths(1) & "'"