vb
Private Sub ListBox1_Click()Dim s as string
Set Rs = Nothing
S=Trim(ListBox1.Text)
Rs.CursorLocation = adUseClient
Rs.Open "select * from s", dbcnn, adOpenDynamic, adLockOptimistic
Set DataGrid1.DataSource = Rs
End Sub
提示:数据库引擎我找不到输入表或查询's',确定他是否存在以及他的名称拼写是否正确。
我的想法是把listbox1中表的信息显示在datagrid控件中,已经把所有的 表明添加在了listbox1控件中。怎么回事?希望各位老师给我看看怎么回事 --------------------编程问答--------------------
's是变量,要引用
Rs.Open "select * from "& s &"", dbcnn, adOpenDynamic, adLockOptimistic
补充:VB , 基础类