重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
Dim a As String = "011"
创新互联建站主营遂平网站建设的网络公司,主营网站建设方案,手机APP定制开发,遂平h5微信小程序定制开发搭建,遂平网站营销推广欢迎遂平等地区企业咨询
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判断变量里的字符个数不够两个自动在前面补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(number, "000000"),得到的数如果不足6位则自动在左边补0。
加右边的话,可以用
While Len(st)6
st=st+"0"
Wend
得到的st就保证6位
是数字的话用FORMAT函数,用法:FORMAT(字符串,0的个数)。
举例:字符串为“123”,左边要补3个0,生成6位字符串。
FORMAT("123","000000")。
如果不是数字,则用STRING函数补零,用法:STRING(重复次数,字符)。
例如,字符串为”ABC“,要左补0生成6位字符串。
STRING(6-LEN("ABC"),"0")"ABC"。
vba的优点:
VBA支持调用Windows底层API,关键是,他们与VB几乎一样,这意味着,你使用Google搜索一个需要的函数的时候返回的查询结果可能是几千个而且很多有实例代码,而使用其他语言,其精确的查询结果往往是0。
VBA 一般嵌入在应用软件之中,他们常常与应用软件有很好的接口,你不用单独购买开发工具就可以立即着手开发。因为你会发现他们都有类似宏的概念。