保留前导零十六进制 vb

Question

进行一些颜色操作，包括将十六进制颜色值保存到变量中。为 1-16 保留前导零时出现问题。相关代码段：

        _coltable.Add("A", (Hex$(_color.A)))
        _coltable.Add("R", (Hex$(_color.R)))
        _coltable.Add("G", (Hex$(_color.G)))
        _coltable.Add("B", (Hex$(_color.B)))

这会修剪 16 以下数字的 LH 空格。_coltable 是字典（字符串，字符串）。 _color，一个颜色对象。下面的文本显示控制台输出：

>> FUNCTION convert bg color to text and return
Recived vars: col: Color [A=255, R=0, G=0, B=160] | coltype: ARGB | mask: {A}{R}{G}{B} | format: HEX
FF{R}{G}{B}
FF0{G}{B}
FF00{B}
FF00A0
End of process. Output:FF00A0
> END BG color to text

第 3-6 行显示迭代过程 - 添加 R 和 G 作为单个零。

用 &s、Right 和 String.format 尝试了各种方法。无法运行。有人有魔杖吗？

Answer 1

尝试

 _coltable.Add("A", _color.A.ToString("X2"))

其中"X"表示十六进制格式，"X2"指定为两位数。

保留前导零十六进制 vb

Preserve leading zeros hex vb

vb.net

hex

leading-zero