vb.net中用来补0的 vba 补0

vb.net 1

1左移10位，1后面加10个0

专注于为中小企业提供网站设计制作、网站制作服务,电脑端+手机端+微信端的三站合一,更高效的管理,为中小企业和田县免费做网站提供优质的服务。我们立足成都，凝聚了一批互联网行业人才，有力地推动了成百上千家企业的稳健成长，帮助中小企业通过网站建设实现规模扩充和转变。

结果就是：10000000000

五、按位运算符

注意不能在VB.Net中直接使用以下二进制数，使用时需转换为相应的十六或十进制数字。

1. 表示按位左移，空缺处补0。如：101101 2 结果为 110100

2. 表示按位右移，如：101101 2 结果为 001011

'写入

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())

Dim a As String = "011"

Dim b As String = "1"

Dim c As String

c = (CInt(a) + CInt(b)).ToString.PadLeft(3, "0")

Label1.Text = c

-----------

将a,b转换为整型之后计算，再转换为string型，之后可以用PadLeft(3, "0")这个来左补零，3表示限定为三位，后面那个“0”就是限定不足3位补0。

分享名称：vb.net中用来补0的 vba 补0
文章起源：http://cdiso.cn/article/dopsigd.html