Question

sql语句 如何获取数取库指定单元格的内的数据

Set conn = CreateObject("adodb.connection") '创建ado对象Set rst = CreateObject("ADODB.recordset") '创建记录集
Dim data As New 数据库conn.Open data.Access数据库rst.Open "select * from 今日数据 order by 编号 asc", conn, adOpenForwardOnly, adLockOptimistic '

请问在这里如何提取返回数据表中日产量列的第一个值100 和第二个值200 第三个值300
rst.Close '关闭记录集conn.Close '关闭与数据库的链接Set rst = Nothing '释放对象Set conn = Nothing '释放对象

Answer 1

SQL 语句改为
rst.Open "SELECT TOP 3 * from 今日数据 order by 编号 asc", conn, adOpenForwardOnly, adLockOptimistic

SELECT TOP 3 指定取返回结果的前三行

返回出现在由 ORDER BY 子句指定的起始和结束范围内的一定数量的记录。假定希望得到 1994 年级中前 25 名学生的名字：
SELECT TOP 25
FirstName, LastName
FROM Students
WHERE GraduationYear = 1994
ORDER BY GradePointAverage DESC;
如果没有包含 ORDER BY 子句，查询将会从 Students 表中返回一个满足 WHERE 子句的包含 25 个记录的任意集合。
TOP 谓词不会在两个相等的值中进行选择。在上面的示例中，如果第 25 和第 26 名的年级平均分相同，那么查询将会返回 26 个记录。
也可以使用 PERCENT 保留字返回出现在 ORDER BY 子句指定的起始和结束范围内的某个百分比数量的记录。假如，您希望返回该年级中最后名次的百分之十个学生，而不是前 25 名学生：
SELECT TOP 10 PERCENT
FirstName, LastName
FROM Students
WHERE GraduationYear = 1994
ORDER BY GradePointAverage ASC;
ASC 谓词指定返回最小值。TOP 之后的值必须是一个无符号整数。
TOP 谓词不影响查询是否可更新。

追问

有点不明白. 可以去掉那个排序.
我就是想把数据库存中的100显示到窗体的LABEL控件中去用什么方法

追答

SELECT TOP 1 日产量 from 今日数据
lable的值=rst的返回值就可以了

你的目的
1.是不是先要从表中取得单个数值,然后用LABLE控件进行显示
2.如果是这样,你首先要写SQL语句从表格中将所要的值找出来,找到你要的值的方法,应该用WHERE 语句

追问

是的.
rst.的返回值是怎么写的
写代码

追答

有两种方法,
第一种用SQL语句,那么返回值只有一个
例如:SELECT TOP 1 日产量 from 今日数据
返回值为一个,
lable.caption=rst("日产量")

第二种方法,返回一个大表的rst,然后在rst中进行查找
Criteria = "[日产量]='" & code & "'"
rst.MoveFirst
rst.Find Criteria
lable.caption=rst("日产量")

Answer 2

Set conn = CreateObject("adodb.connection") '创建ado对象
Set rst = CreateObject("ADODB.recordset") '创建记录集
Dim data As New 数据库
conn.Open data.Access数据库
rst.Open "select * from 今日数据 where 日产量 is not null order by 编号 asc", conn, adOpenForwardOnly, adLockOptimistic '

rst.Close '关闭记录集

conn.Close '关闭与数据库的链接
Set rst = Nothing '释放对象
Set conn = Nothing '释放对象

追问

没内容..

追答

你原来能查询得到结果吗？