[问答] 如何通过组合框中表的名称打开相应的表,使新打开得表中的数据按照“班级”进行分类汇总
(数据库是access,界面程序是VB)
<br>Dim sql3 As String
<br>Dim a As String
<br>a = Form4.Combo1.Text
<br>Set db3 = OpenDatabase("E:xxvbsjk.mdb", False, False)
<br>
<br>sql3 = "select * from " + Trim(a) + " group by 班级 Order By 考号"
<br>如何修改上面一句使它作用相同,并且可以执行!
<br>
<br>
<br>Set rs5 = db3.OpenRecordset(sql3, dbOpenDynaset)
<br>
<br>如何通过选择组合框中的表的名称打开相应的表,并且可以使新打开得表中的数据按照“班级”进行分类汇总(数据库是access,界面程序是VB) |