以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  有几个动态加载表的设置我问一下枚举:  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=14987)
--  作者：blackzhu
--  发布时间：2011/12/9 8:30:00
--  有几个动态加载表的设置我问一下枚举:

1)所有的字符的数据的全部靠左,帮助里面没有找到,系统可以设置为靠左,靠右,居中的.

 

2)数值列可以利用代码设置为"0.00",保留两位小数,但是千分位的设置是怎么样设置的?

 

Dim t2 As Table = Tables(e.Form.Name & "_Table1")
For Each c As Col In t2.Cols
    If c.DataCol.IsNumeric  Then
        c.DataCol.SetFormat("0.00")
    End If
Next

 

保留两位小数的,我是这样设置的.但是千分位的没找到.

 

3)还有文本框的格式符号为千分位以及保留两位小数,怎么设置的?

[此贴子已经被作者于2011-12-9 8:31:03编辑过]
--  作者：狐狸爸爸
--  发布时间：2011/12/9 8:37:00
--  

1、全部靠左：

 

For Each c As col In Tables("表A").Cols
   c.TextAlign = TextAlignEnum.Left
Next

 

2、千分位：

 

For Each c As Col In Tables("表A").Cols
    If c.DataCol.IsNumeric Then
        c.DataCol.SetFormat("#,##0.00")
    End If
Next

 

3、格式符号设置为：#,##0.00

 
--  作者：blackzhu
--  发布时间：2011/12/9 9:19:00
--  
谢谢老大,这个项目做下来,基本什么都碰到了.