以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  Table Cols 显示中文  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=31251)

--  作者:tommyfung
--  发布时间:2013/4/12 11:50:00
--  Table Cols 显示中文

我的 SQL 表Column 是英文拦名, 如何在 Table1中以中文显示栏名

 

我在 afterload 用这不行. 请指导 !

 

Tables("备料单录入_备料单录入table1").Cols("NEED_DATE").ShortCaption = "需求日期"
Tables("备料单录入_备料单录入table1").Cols("TRAN_DATE").ShortCaption = "申请日期"
Tables("备料单录入_备料单录入table1").Cols("DEPT").ShortCaption = "部门"
Tables("备料单录入_备料单录入table1").Cols("WI_NO").ShortCaption = "工作单号"
Tables("备料单录入_备料单录入table1").Cols("AGING").ShortCaption = "待料时间"


--  作者:Bin
--  发布时间:2013/4/12 11:51:00
--  
Tables("备料单录入_备料单录入table1").Cols("NEED_DATE").Caption="XXX"
--  作者:don
--  发布时间:2013/4/12 12:08:00
--  
Dim Lms as string() = {"NEED_DATE","TRAN_DATE","DEPT","WI_NO","AGING"}
Dim bts as string() = {"需求日期" ,"申请日期" ,"部门","工作单号","待料时间"}
With Tables("备料单录入_备料单录入table1").grid
    For n1 as integer = 0 to Lms.length-1
         .setdata(0,Lms(n1),bts(n1))
    Next
End With

--  作者:qq34658788
--  发布时间:2013/4/12 13:41:00
--  
正解
--  作者:tommyfung
--  发布时间:2013/4/13 9:47:00
--  

多谢 Don 指导

 

但我是动态表 , 加入后变成这样

 

如何停用表之多层次表头, 属性名是什么 ?

 


图片点击可在新窗口打开查看此主题相关图片如下:图1.jpg
图片点击可在新窗口打开查看


--  作者:Bin
--  发布时间:2013/4/13 9:50:00
--  
http://www.foxtable.com/help/topics/2373.htm
--  作者:tommyfung
--  发布时间:2013/4/13 10:19:00
--  

这不是实表.

 

Tables("备料单_备料单Table1").Grid.AllowFiltering = True
Tables("备料单_备料单Table1").UseVisualStyle = False
Tables("备料单_备料单Table1").MultiRowHeader = False

 

这不行 ! 只可用在 DataTable ?


--  作者:Bin
--  发布时间:2013/4/13 10:23:00
--  
DataTables("表A").MultiRowHeader = False
DataTables("表A").BuildHeader()


--  作者:tommyfung
--  发布时间:2013/4/13 10:42:00
--  
多谢 ! 弄了2天了 图片点击可在新窗口打开查看