Подскажите способ преобразования GUID строчки в GUID тип - VB

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

Создать GUID и преобразовать в строку легко, а как сделать обратно?

Решение задачи: «Подскажите способ преобразования GUID строчки в GUID тип»

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

                            Private Type GUID
    Data1                   As Long
    Data2                   As Integer
    Data3                   As Integer
    Data4(7)                As Byte
End Type
 
Private Declare Function CLSIDFromString Lib 'ole32.dll' (ByVal lpszProgID As Long, pCLSID As GUID) As Long
 
'============================================
Dim CLSID As GUID
 
CLSIDFromString StrPtr('{7EBDAAE0-8120-11CF-899F-00AA00688B10}'),CLSID
                        