哪里有金额控件(带千分位分隔符)下载。 简单的类似文本框那样就行了。

要有如下功能：当输入数字1234后,里面的字符变成1,234.00 。当读取他里面的数据时读到的是1234。

我要的是类似文本框那样的控件。

6 个解决方案

#1

MaskEdBox控件就行了，里面有设置。

^_^

#2

private sub text1_lostfocus()
    text1.text=format(text1.text,"0,000")'好像是这样的吧
end sub


dim d as double
d=val(text1.text)

#3

format(text1.text,"standard")

#4

format一下不就搞定了？

#5

format(text1.text,"#,###")

#6

可以在TEXTBOX的KEY_UP里写
text1.text=format(val(text1.text),"#,###.00")
text1.selstart=len(text1.text)
这样如果输入的不是数字可以自动滤去，你试试