Fungsi GUIDFromString mengonversi string menjadi GUID, yang merupakan array bertipe Byte.
Sintaks
GUIDFromString(stringexpression)
Argumen stringexpression yang diperlukan adalah ekspresi string yang mengevaluasi ke GUID dalam bentuk string.
Keterangan
Mesin database Microsoft Access menyimpan GUID sebagai array tipe Byte. Namun, Access tidak dapat mengembalikan data Byte dari kontrol pada formulir atau laporan. Untuk mengembalikan nilai GUID dari kontrol, Anda harus mengubahnya menjadi string. Untuk mengonversi GUID menjadi string, gunakan fungsi StringFromGUID . Untuk mengonversi string menjadi GUID, gunakan fungsi GUIDFromString .
Contoh kueri
| Ekspresi | Hasil |
|---|---|
| PILIH userID,GUIDfromString(userGUID) sebagai GUIDCode DARI GUID_Table; | Menampilkan "userID", Mengonversi StringExpression(userGUID) menjadi GUID (array of bytes) dan ditampilkan di kolom GUIDCode. Contoh ini hanya berfungsi untuk ekspresi string yang dapat dievaluasi ke GUID. |
Contoh VBA
Catatan
Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.
Contoh berikut ini menggunakan fungsi GUIDFromString untuk mengonversi string menjadi GUID. String adalah GUID yang disimpan dalam bentuk string dalam tabel Karyawan yang direplikasi. Bidang, s_GUID, adalah bidang tersembunyi yang ditambahkan ke setiap tabel yang direplikasi dalam database yang direplikasi.
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