当前位置:编程学习 > VB >>

VSFlexGrid如何对列重命名

数据库中的字段是英文显示的名称,但是表格显示出来以后,希望用中文显示,更为直观,不知道哪位高手可以赐教 --------------------编程问答-------------------- 网格的第一行每列的内容就是列名称了
PS:列还有colkey 和colindex 也很好用的 --------------------编程问答-------------------- 我自己搞定了,好像这样就可以,于大家一起分享
zh as 帐号,pwd as 密码,czzh as 操作帐号,yxzh as 允许帐号  --------------------编程问答-------------------- 搞定了就好,顺便接点分..... --------------------编程问答--------------------
引用楼主 shengqx 的回复:
数据库中的字段是英文显示的名称,但是表格显示出来以后,希望用中文显示,更为直观,不知道哪位高手可以赐教


Public Sub GetColumFormat() '设置fg标题与宽度
        Dim i As Integer
        Dim A
        A = Array("0", "FID", "申购单号", "部门", "日期", "制票人", "开单者")
        fg.Cols = UBound(A) + 1
        For i = LBound(A) To UBound(A)
            fg.TextMatrix(0, i) = A(i)
        Next
        A = Array(0, 0, 1500, 1000, 1200, 1000, 1000)
        For i = LBound(A) To UBound(A)
            fg.ColWidth(i) = A(i)
        Next
        fg.SelectionMode = flexSelectionListBox
        fg.AllowSelection = False
    End Sub

获取数据后调用这个 --------------------编程问答--------------------
补充:VB ,  控件
CopyRight © 2012 站长网 编程知识问答 www.zzzyk.com All Rights Reserved
部份技术文章来自网络,