以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  千位分隔符和小数位数锁定问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=25515)

--  作者:popo7to
--  发布时间:2012/11/10 16:34:00
--  千位分隔符和小数位数锁定问题

应窗口做数据输入,文本框做的输入框输入数字无法显示千位分隔符和小说位数。

请问如何解决?

 

数据库已经按照帮助文件设置过了。


--  作者:lin_hailun
--  发布时间:2012/11/10 16:45:00
--  
 这个正常,设置的,只对表格有效。

 如果需要在文本框显示这种格式,还需要设置一下才行。

在文本框的valuechanged事件写代码
 Dim num As Integer = e.Sender.Text
 e.Sender.Text = Format(num,"#,###.00")

http://www.foxtable.com/help/topics/0361.htm

--  作者:popo7to
--  发布时间:2012/11/10 17:21:00
--  

不太成功。

点击保存后变成了空值。


--  作者:popo7to
--  发布时间:2012/11/10 17:35:00
--  

FormatString

字符型,返回或设置文本框的格式符号。

示例

例如希望按照百分比格式显示数值,最多两位整数,保留两位小数:

Forms("窗口1").Controls("TextBox1").FormatString = "#,###.00"

有关格式化符号的规范,和Format函数相同,请参考:

格式化数字

 

 

用帮助文件里的这个句子实现了。