Format возвращает не то, что хотелось бы - VB
Формулировка задачи:
Здравствуйте !
Может, я чего-то не понимаю,
почему результат - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д