13518219792
到底是加左边还是加右边啊？
创新互联建站服务紧随时代发展步伐，进行技术革新和技术进步，经过10年的发展和积累，已经汇集了一批资深网站策划师、设计师、专业的网站实施团队以及高素质售后服务人员，并且完全形成了一套成熟的业务流程，能够完全依照客户要求对网站进行网站设计、做网站、建设、维护、更新和改版，实现客户网站对外宣传展示的首要目的，并为客户企业品牌互联网化提供全面的解决方案。
加左边的话可以用Format(number, "000000")，得到的数如果不足6位则自动在左边补0。
加右边的话，可以用
While Len(st)6
st=st+"0"
Wend
得到的st就保证6位
1左移10位，1后面加10个0
结果就是：10000000000
五、按位运算符
注意不能在VB.Net中直接使用以下二进制数，使用时需转换为相应的十六或十进制数字。
1. 表示按位左移，空缺处补0。如：101101 2 结果为 110100
2. 表示按位右移，如：101101 2 结果为 001011
text1.text = format(txthuor.text,"000")'其中000为多少位，txthour为文本框的数值
'写入
Dim bytes() As Byte = {34, 23, 43, 43, 55, 3}
Dim items = (From item In bytes Select item.ToString("000")).ToArray()
System.IO.File.WriteAllLines("c:\test.txt", items)
'读取
Dim items2 = System.IO.File.ReadAllLines("c:\test.txt")
Dim bytes2 = (From item In items2 Select Byte.Parse(item)).ToArray()
For Each item In bytes2
Console.WriteLine(item.ToString())
Next
vb判断变量里的字符个数不够两个自动在前面补0，提供两种常用的方法;
1、根据长度判断;
a = 5 '注意这里a如果定义为数字类型（Integer、long等），补零后的变量尽量换一个其他变量值，比如b
If Len(a) 2 Then b = "0" a else b=a ‘如果a长度小于2，就前面补零
2、先补零，再取后2位
a=5
b = "0" a
b= Right(b, 2)
