Função GUIDFromString

Aplica-se a
Access para Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

A função GUIDFromString converte uma cadeia de caracteres em um GUID, que é uma matriz do tipo Byte.

Sintaxe

GUIDFromString(stringexpression)

O argumento stringexpression necessário é uma expressão de cadeia de caracteres que é avaliada como um GUID em forma de cadeia de caracteres.

Comentários

O mecanismo de banco de dados do Microsoft Access armazena GUIDs como matrizes do tipo Byte. No entanto, o Access não pode retornar dados de Byte de um controle em um formulário ou relatório. Para retornar o valor de um GUID de um controle, converta-o em uma cadeia de caracteres. Para converter um GUID em uma cadeia de caracteres, use a função StringFromGUID . Para converter uma cadeia de caracteres em um GUID, use a função GUIDFromString .

Exemplo de consulta

Expressão. Resultados
SELECT userID,GUIDfromString(userGUID) as GUIDCode FROM GUID_Table; Exibe a "userID", converte o StringExpression(userGUID) em GUID (matriz de bytes) e exibe na coluna GUIDCode. Este exemplo só funciona para uma expressão de cadeia de caracteres que pode ser avaliada como um GUID.

Exemplo de VBA

Observação

Os exemplos a seguir demonstram o uso dessa função em um módulo do Visual Basic for Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência do desenvolvedor na lista suspensa ao lado de Pesquisar e insira um ou mais termos na caixa de pesquisa.

O exemplo a seguir usa a função GUIDFromString para converter uma cadeia de caracteres em um GUID. A cadeia de caracteres é um GUID armazenado em forma de cadeia de caracteres em uma tabela de Funcionários replicada. O campo, s_GUID, é um campo oculto adicionado a cada tabela replicada em um banco de dados replicado.


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