VB怎么在DATAGRID里面实现按照某一列降序排列？

Question

     Dim strSQL As String
      Dim cnn As New ADODB.Connection
      Dim rs As New ADODB.Recordset
      rs.LockType = adLockOptimistic
      rs.CursorType = adOpenKeyset
      cnn.CursorLocation = adUseClient
      cnn.ConnectionString = connstr
      cnn.Open
      rs.Open "SELECT 姓名,学好,总分,课程 FROM ZERO_TAB", cnn
      If Not rs.EOF Then
      Set Datagrid.DataSource = rs
      End If
请教如何实现按照总分在DATAGRID里面按照降序排列？？？谢谢

Answer 1

 rs.Open "SELECT 姓名,学好,总分,课程 FROM ZERO_TAB order by 总分 desc", cnn

Answer 2

rs.Open "SELECT 姓名,学好,总分,课程 FROM ZERO_TAB order by 总分 desc", cnn