关于DateGrid绑定数据库后如何按顺序排列数据？

Question

 .Open "[user]", objCn, adOpenStatic, adLockReadOnly 
修改成 .Open "select * from 表名 order by 列名"

Answer 1

LZ:未见你定义的strSQL变量的赋值句,数据排序可通过SQL结构化查询句对数据库操作实现.
Private Sub Form_Load()
    Dim strSQL As String
    Dim objCn As New ADODB.Connection
    Dim objRs As New ADODB.Recordset
    strSQL = "select * from user order by 年龄"
    objCn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & App.Path & "\hd.mdb;"
    objCn.Open
    objRs.CursorLocation = adUseClient
    objRs.Open strSQL, objCn, adOpenDynamic, adLockOptimistic
    Set DataGrid1.DataSource = objRs
End Sub

Answer 2

.Open "[user]", objCn, adOpenStatic, adLockReadOnly 
修改成 .Open "select * from 表名 order by 列名"
==============》
实时错误 '3709' 
连接无法用于执行此操作。在此上下文中它可能已经被关闭或无效。 
返回了这样的错误 
 

Answer 3

感谢zdingyun的指点，问题得到解决！

Answer 4

数据源先以ID排序，然后再绑定datagrid绑定，就OK了。