vb判断变量里的字符个数不够两个自动在前面补0,提供两种常用的方法;
从事服务器机柜租用,服务器租用,云主机,虚拟主机,国际域名空间,CDN,网络代维等服务。
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
'写入
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
1左移10位,1后面加10个0
结果就是:10000000000
五、按位运算符
注意不能在VB.Net中直接使用以下二进制数,使用时需转换为相应的十六或十进制数字。
1. 表示按位左移,空缺处补0。如:101101 2 结果为 110100
2. 表示按位右移,如:101101 2 结果为 001011