十六进制数怎么格式化

十六进制数如何格式化
我想要得到一个四位的十六进制数，如不足四位的用0补足，如32得到 0032，acb得到0acb有什么好办法吗？

------解决方案--------------------

  Dim iHex As String

  iHex = Hex(115)

  Debug.Print String(4 - Len(iHex), "0") & iHex

------解决方案--------------------
format
------解决方案--------------------
那我提供另一个招,用rset语句十六进制数怎么格式化

dim Buff as string


buff="    "    '几位就几个空格

rset buff="acb"

buff=replace(buff," ","0")


msgbox buff

------解决方案--------------------



Dim strHex As String

strHex = "123"

msgbox Right("0000" & strHex,4)

------解决方案--------------------



Dim strP as String

Dim strHex as String

strP="32"

strHex=Right("0000" & strP,4)

Debug.print strHex

------解决方案--------------------
我通常用 Right 函数来解决：

Right("000" & Hex(x),4)