DATAgrid排序后没有反应，SQL语句没有错！！咋回事？？？

Question

我是VB初学者，
我有个问题请教大家，我用ACCESS+VB，用DATAgrid显示一个成绩表，一个按钮是要将成绩排序，如最高分，最低分等，我做的排序语句执行了，但是DATAGRID没有显示排序结果。我不知道怎么立即刷新，谢谢大家！

Answer 1

Private Sub Form_Load()
    Dim strConn As String
    Dim pubConn As New ADODB.Connection
    Dim rsTable As New ADODB.Recordset
    Dim strSQL As String    strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\North.mdb;Persist Security Info=False"
    pubConn.Open strConn    rsTable.CursorLocation = adUseClient
    strSQL = "select  * from 成績表 order by 總分"
    rsTable.Open strSQL, pubConn, adOpenDynamic, adLockOptimistic
    Set DataGrid1.DataSource = rsTableEnd Sub