可以再写你的DBGRID的DATASource,和RecordsetSource.
改写标头文本,你可以右单击DBGrid然后属性!在里面修改!

解决方案 »

  1.   

    Public Dbcn As New adodb.Connection
    Public Rec As New adodb.Recordset    AppPath = Trim(App.Path) + "\"
        Dbcn.Open "driver={Microsoft Access Driver(*.mdb)};Pwd=;dbq=" & AppPath & "db1.mdb"
        rec.open "select * from abc order by cba asc",dbcn,3,3set DBGrid.datasource=rec   'band recordset to the dbgrid control
    dbgrid.colums(0).caption="xxxx"
      

  2.   

    Below is to do that click a head of grid,sort automaticlyPrivate Sub DataGrid1_HeadClick(ByVal ColIndex As Integer)
        rsEmployees.Sort = rsEmployees.Fields(ColIndex).Name
    End Sub