如何通过组合框中表的名称打开相应的表，使新打开得表中的数据按照“班级”进行分类汇总

（数据库是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）

------------