Question

vb怎么把sql语句的结果放在label输出

表名：Student

Id 111 222 333
Name aaa bbb ccc
Number 50 60 70

SQL语句 SELECT AVG(Number) FROM Student

用Ado连接的数据库，怎么把结果显示在Label上面呢？

Answer 1

"SELECT AVG(Number) As AAA FROM Student"

Label1.Caption = Rst.Fields("AAA").Value

追问

不行啊

追答

把你代码贴上来！

追问

其中的一段

Private Sub cmdBorrow_Click()
AdoBook.RecordSource = "SELECT AVG(Number) As AAA FROM Student"
Label4.Caption = AdoBook.Recordset.Fields("AAA").Value
End Sub

追答

有没有提示错误什么的呢？如果没有提示错误，象下面这样试试？
Private Sub cmdBorrow_Click()
AdoBook.RecordSource = "SELECT AVG(Number) As AAA FROM Student"
AdoBook..Refresh
Label4.Caption = AdoBook.Recordset.Fields("AAA").Value
End Sub

追问

FROM字句语法错误 对象的ReFresh的方法“IAdodc“失败

追答

我刚才回答后，已经在计算机里测试过，就是这个答案！