1左移10位，1后面加10个0
为高港等地区用户提供了全套网页设计制作服务，及高港网站建设行业解决方案。主营业务为网站制作、成都做网站、高港网站设计，以传统方式定制建设网站，并提供域名空间备案等一条龙服务，秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求，就会得到认可，从而选择与我们长期合作。这样，我们也可以走得更远！
结果就是：团桐10000000000
五、按位运算符
注意不能在VB.Net中直接使用以下二进制数塌拦坦，使用时需转换为相应的十六或十进制数字。
1. 表衡友示按位左移，空缺处补0。如：101101 2 结果为 110100
2. 表示按位右移，如：101101 2 结果为 001011
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)
没那么麻烦啦！用Format()函数就李盯可贺扰败以啦！禅颤
Private Sub CmdNumber_Click()
TextNumber= Format(TextNumber, "000000")
TextNumber.Locked=True'锁定文本框
End Sub
