Office中国论坛/Access中国论坛

标题: 用一个sql语句查询一数值,如何在vb代码中接收呢? [打印本页]

作者: lilubin    时间: 2003-6-15 22:26
标题: 用一个sql语句查询一数值,如何在vb代码中接收呢?
用一个sql语句查询一数值,如何在vb代码中接收呢?
例如:
dim blv as double
gs = "select lv from 表 "
docmd.runsql (gs)
如何把返回的数值赋给blv

[此贴子已经被作者于2003-6-15 16:24:18编辑过]


作者: cg1    时间: 2003-6-16 02:00
dim rs as new adodb.recordset
rs.open strSQL,currentproject.connection,1,1
if rs.eof and rs.bof then
    msgbox "没记录可以取回"
else
    do until rs.eof
        blv=rs("lv")
        rs.movenext
    loop
end if

如果单值直接用
blv=nz(dlookup("lv","表"),0)


[此贴子已经被作者于2003-6-15 18:00:50编辑过]






欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3