vb 如何改变数的位数，就是把99变成0099

来源：百度知道编辑：UC知道时间：2024/06/12 02:28:59

把低于4位的数换成4位，给前面加0，补成4位
我是菜鸟，可否给个源码，加上注释

form放一个按钮,一个textbox,不要改动任何,复制代码运行即可.

Private Sub Command1_Click()
If IsNumeric(Text1.Text) Then '如果textbox1内容是数字
If Len(Text1.Text) < 4 Then '如果长度小于4
Text1.Text = Format(Text1.Text, "000#") '格式化成4位,不足前面补0
End If
Else '否则,如果不是数字,弹出提醒
MsgBox "请输入数字"
End If
End Sub

一个六位数记为abcde2,把末尾数2移到最前面。那原数就是新数的3倍。那原数是多少？ vb 中如何判断小数点的位数如何计算一个数的位数？有一个正整数是7位数,他的首位数是5,若把5移动末尾,原数就是新数的3倍. 一个六位数的左边第一位数字是1.如果把这个数字移到最右边,那么所得的六位数就是原数的3倍,求原来的六位数十万火急！VB中如何在文本中将首位数相同的行的第二位数相加，最后输出生成新的文本． VB中如何先自动计算行数，然后在文本中将首位数相同的行的第二位数相加，最后输出生成新的文本．如何进行两个不同位数的有符号数相加有一个六位数,它的个位数字是6.如果把6移至最左边,那么所得的新的六位数就是原数的4倍.求原数. 一个四位数,左边第一位数字是7,若把这个数调到最后一位,得到的新四位数比原四位数少864,求原四位数