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 de expressão de cadeia necessária é uma expressão de cadeia de caracteres que é avaliada como um GUID em forma de cadeia.

Comentários

O motor de base de dados do Microsoft Access armazena GUIDs como matrizes do tipo Byte. No entanto, o Access não pode devolver dados Byte de um controlo num formulário ou relatório. Para retornar o valor de um GUID de um controle, você deve convertê-lo 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) como GUIDCode FROM GUID_Table; Exibe o "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 do VBA

Nota

Os exemplos seguintes demonstram a utilização desta função no módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Procurar e introduza 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 na forma de cadeia em uma tabela de funcionários replicada. O campo, s_GUID, é um campo oculto adicionado a cada tabela replicada numa base de dados replicada.


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