简单问题，送分

[wb4u]

Dim iValue as integer
Dim strValue as string

iValue = 1000

如何让strValue = "03E8",我只能得到
strValue = CStr(Hex(iValue)) ' "3E8"

[lubaixu]

能不能说明白点呀.....

[lubaixu]

呵呵...
这不也就成了吗:
strValue="0" & Cstr(Hex(iValue))

[wb4u]

天，这样也算,我没说清楚

iValue值不固定,范围0-65535

iValue = 1 ---> strValue = "0001"
iValue = 100 ---> strValue = "0064"
iValue = 1000 ---> strValue = "03E8"
iValue = 10000 ---> strValue = "2710"

[Gelim]

我一直用以下的方法！你看看能不能帮到你！

Dim iValue as integer
Dim strValue as string

iValue = 1000

'如何让strValue = "03E8",我只能得到
strValue = right$("0000"+CStr(Hex(iValue)),4) ' "03E8"

[wb4u]

是个办法，我VB不大会，以为Format可以实现，谢谢！