我写了个数据库的小程序,用了datagrid,数据源是用access,程序运行的时候datagrid的列名都是access里表的列名(我把每列字段名用英文,每个字段由都设有一个标题名),我想让datagrid的列名显示的是访问的表的字段的标题名,要怎么做呢?

解决方案 »

  1.   

    你试试吧,好用的
    记得要引用adoDim WithEvents adoPrimaryRS As Recordset '数据库连接对象
    Private Sub Command1_Click()
       'strsql 是你的查询语句 你可以order by 排序的字段
       'strsql="select xh as 学号 from 表" 这里的学号就是你数据表中字段的标题
       strsql="select 字段 from 表"
       Set Db = New Connection
       Db.CursorLocation = adUseClient
       '下面的连接数据字符串你要修改一下
       Db.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\计划管理系统.mdb;Persist Security Info=False"
       Set adoPrimaryRS = New Recordset
       adoPrimaryRS.Open strsql, Db, adOpenStatic, adLockOptimistic
       Set DataGrid1.DataSource = adoPrimaryRS
    end sub
      

  2.   

    cuilei197979(风) 正解
    "select 字段1 标题1,字段2,标题2,.... from 表"
      

  3.   

    上面写错了,应该写成这样:
    "select 字段1 标题1,字段2 标题2,.... from 表"
    或:
    "select 字段1 as 标题1,字段2 as 标题2,.... from 表"