Dim zxh As Short = 23
Dim xzxh As String
xzxh = "000".SubString(0, 3 - Cstr(zxh).Length) & zxh
MessageBox.show(xzxh)
加好友 
发短信
Post By：2014/9/10 15:27:00 [只看该作者]
