怎么进行格式化输出？把数据0输出显示为00

Question

怎么进行格式化输出？通过hex()或Format()函数，把一个十进制数变为16进制。比如：255变成FF，8变成8，我想把8变成08，就是保持数据的位数为两位。

Answer 1

能举个例子吗？ hex（）好像没有这种格式，用format怎么实现将10进制变成固定位宽的16进制数a是10进制数Format(Hex(a), "00")不对，输出00了，Format(a, "00"+"x")也不对啊format（）应该怎么输出？

Answer 2

?format(hex(15),"0#")
F
?format(hex(8),"0#")
08
a=hex(15)
?iif(len(a)=1,"0" & a,a)
0F

Answer 3

String(2 - Len(Hex(8)), "0") & Hex(8)

Answer 4

dim ss as string 
ss="sdfsdf"
text1.text=iif(ss='0','00',ss)

Answer 5

Private Sub Command1_Click()
Dim a As Integer
a = 255
MsgBox Format(Hex(a), "00")
End Sub
没有问题啊。。

Answer 6

MsgBox(Format(Hex(255), "00"))不行，显示为00了

Answer 7

Function FormatHex( ByVal a As Long )
  FormatHex = String(Len(Hex(a) Mod ), "0") & Hex(a)
End Function就可以输出任意数的格式十六进制了

Answer 8

"MsgBox(Format(Hex(255), "00"))不行，显示为00了"我知道这个问题了，Hex()返回的是string，format的第一个参数为string就返回0了，是这样吗？

Answer 9

String（）不能用，告诉我是个class？？？