VB怎样让文本框输入多位数字后显示千位分离符

→请问应代码怎么写 

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 13 Then
Text1.Text = Format(Text1.Text, "##,###.0")
End If
End Sub
文本框叫text1,按下回车后他就会显示
千位分离符

主要就是用了format函数,你可以自己查一下,
温馨提示:内容为网友见解,仅供参考
无其他回答

VB怎样让文本框输入多位数字后显示千位分离符
文本框叫text1,按下回车后他就会显示 千位分离符 主要就是用了format函数,你可以自己查一下,

在vb中,如何将在text文本框中输入的数据自动显示为千位分隔符。。
两种方法,第一种是在属性对话框中选择FONT,双击它进行设置。第二种方法就是在代码里面设置,用FORMATE函数。

在vb中怎样将文本框中的数字格式化成千分位?怎样格式化成数字格式?
Standard 标准,即带千位分隔号和两位小数 format$("100123","Standard") '返回值 100,123.00 例如:Dim a As Integer a = 12345 Label1.Caption = a '一般格式 Label2.Caption = Format(a, "Standard") '带千分位和两位小数

vb小问题
如在代码中想在 format 中包含一个字符串,必须用 Chr(34) 将文本括起来(34 为双引号 (")) Format$(123.45,"TTT") 返回值 TTT注:当双引号中的文本包含特殊的参数符号如e,要使用转义符"\\",否则会按e的作用显示; 类似多目运算符的作用。当共有 四 部分时,当大于0时,按第一部分进行格式化,当小于0时按...

VB中,关于Format的用法问题 求解
Format(12345612345.68, "0000\\,0.00")注意:1、中间加的字符,是从小数点开始计算位置的 2、千分位是固定的位置 3、将“,”逗号不做千分位使用,前面加“\\”转义符

VB操作题。设计一个程序,将从键盘输入的四位数逆序输出。
Private Sub Command1_Click()Dim data(3)data(0) = Mid(Text1.Text, 1, 1) '取第一位数据 data(1) = Mid(Text1.Text, 2, 1) '取第二位数据 data(2) = Mid(Text1.Text, 3, 1) '取第三位数据 data(3) = Mid(Text1.Text, 4, 1) '取第四位数据 '提供两种显示方法:'第...

初学c语言...请问只输入一个多位数,如何把个位、十位、百位等分开输出...
这个代码的功能可以将所输入的数分解,并且根据提示可以输出你想输出位的数字,比如,你想输出个位上的数字 按q为退出程序 #include "stdio.h" #define N 10 main() { long n,i,a[N],k=0; char ch; printf("请输入任意数:\\n"); scanf("%d",&n); for(i=n;i>0;i\/=10) { a[k++]=i%10; ...

vb中怎么取出十位、百位、千位上的数字?
dim num as longnum=11987msgbox "个位:" & mid(num,len(num)-1,1)msgbox "百位:" & mid(num,len(num)-2,1)msgbox "千位:" & mid(num,len(num)-3,1)msgbox "万位:" & mid(num,len(num)-4,1)

VB五位数解析
'属性设置 text(i-1).visible=true text(i-1).text=m while i<=Length end if end sub '上面假定文本框里只能输入整数,具体怎么限制你自己想办法吧 '上面假定已经有一个文本框叫text1(0),而且是控件数组 '控件数组中各个文本框控件的位置你自己设置吧,哈哈 '上面的代码没有经过测试,纯...

VB中 Format(x, "#") 是把x怎样格式化
(0)数字占位符。显示一位数字或是零。如果表达式在格式字符串中 0 的位置上有一位数字存在,那么就显示出来;否则,就以零显示。如果数值的位数少于格式表达式中零的位数(无论是小数点的左方或右方),那么就把前面或后面的零补足。如果数值的小数点右方位数多于格式表达式中小数点右面零的位数,那么...

相似回答
大家正在搜