神马品牌网ci restful api:关于VB+ACCESS的编程
来源：百度文库 编辑：神马品牌网 时间：2024/04/29 21:17:29
一个窗体上，text1,text2,command1
点command1，text1显示数据库中下一条记录
我想在text1改变之后，text2立刻显示如下的语句的结果
na = Text1.Text
Data1.RecordSource = "select avg(score) from score where student=''" + na + "'"
怎么弄阿？
新手，有望指教
点command1，text1显示数据库中下一条记录
我想在text1改变之后，text2立刻显示如下的语句的结果
na = Text1.Text
Data1.RecordSource = "select avg(score) from score where student=''" + na + "'"
怎么弄阿？
新手，有望指教
Private Sub Text1_OnChange()
na = Text1.Text
Data1.RecordSource = "select avg(score) from score where student=''" + na + "'"
End Sub
在你的text1的Change事件里写上面那两句代码
你上面的代码没有给text2赋值呀，自己加上。
我也忘记怎么弄了,不过我们还是学过了的,现在忘记也
Private Sub Text1_OnChange()
na = Text1.Text
Data1.RecordSource = "select avg(score) from score where student=''" + na + "'"
End Sub
Private Sub Text1_OnChange()
na = Text1.Text
Data1.RecordSource = "select avg(score) from score where student=''" + na + "'"
Text2.Text = Data1.Recordset.Fields(0).Value
End Sub