Format возвращает не то, что хотелось бы - VB

Формулировка задачи:

Здравствуйте ! Может, я чего-то не понимаю, почему результат - 00 ?

debug.? format$("4A","00")

Решение задачи: «Format возвращает не то, что хотелось бы»

textual
                            Листинг программы 
                        

                            Function GUID_2_String(ID As UUID) As String
    On Error Resume Next
    GUID_2_String = "{" & Right$("0000000" & Hex(ID.Data1), 8) & _
        "-" & Right$("000" & Hex(ID.Data2), 4) & _
        "-" & Right$("000" & Hex(ID.Data3), 4) & _
        "-" & Right$("0" & Hex(ID.Data4(0)), 2) & Right$("0" & Hex(ID.Data4(1)), 2) & _
        "-" & Right$("0" & Hex(ID.Data4(2)), 2) & Right$("0" & Hex(ID.Data4(3)), 2) & _
        Right$("0" & Hex(ID.Data4(4)), 2) & Right$("0" & Hex(ID.Data4(5)), 2) & _
        Right$("0" & Hex(ID.Data4(6)), 2) & Right$("0" & Hex(ID.Data4(7)), 2) & "}"
End Function
                        