Функція GUIDFromString перетворює рядок на ідентифікатор GUID, який є масивом типу Byte.
Синтаксис
GUIDFromString(stringexpression)
Обов'язковий аргумент stringexpression – це рядковий вираз, який у рядковому вигляді обчислюється як GUID.
Примітки
Обробник баз даних Microsoft Access зберігає ідентифікатори GUID у вигляді масивів типу "байт". Проте Access не може повернути дані "Байт" з елемента керування форми або звіту. Щоб повернути значення GUID з елемента керування, потрібно перетворити його на рядок. Щоб перетворити ідентифікатор GUID на рядок, використовуйте функцію StringFromGUID . Щоб перетворити рядок на ідентифікатор GUID, використовуйте функцію GUIDFromString .
Приклад запиту
| Вираз | Результати. |
|---|---|
| SELECT userID,GUIDfromString(userGUID) as GUIDCode FROM GUID_Table; | Відображає значення "userID", перетворює StringExpression(userGUID) на GUID (масив байтів) і відображає в стовпці GUIDCode. Цей приклад працює лише для рядкових виразів, які можуть обчислюватися до GUID. |
Приклад VBA
Примітка.
У прикладах нижче показано використання цієї функції в модулі Visual Basic for Applications (VBA). Щоб отримати докладні відомості про використання модуля VBA, клацніть пункт Довідник розробника в розкривному списку поряд із полем Пошук і введіть у поле пошуку принаймні один термін.
У прикладі нижче використано функцію GUIDFromString , щоб перетворити рядок на ідентифікатор GUID. Рядок – це ідентифікатор GUID, що зберігається у вигляді рядка в реплікованій таблиці співробітників. Поле s_GUID – це приховане поле, яке додається до кожної реплікованої таблиці в реплікованій базі даних.
Sub CheckGUIDType()
Dim dbsConn As ADODB.Connection
Dim rstEmployees As ADODB.Recordset
' Make a connection to the current database.
Set dbsConn = Application.CurrentProject.Connection
Set rstEmployees = New ADODB.Recordset
rstEmployees.Open "Employees", _
dbsConn, , , adCmdTable
' Print the GUID to the immediate window.
Debug.Print rst!s_GUID
Debug.Print TypeName(rst!s_GUID)
Debug.Print TypeName(GuidFromString(rst!s_GUID))
Set rstEmployees = Nothing
Set dbsConn = Nothing
End Sub