Catatan
Akses ke halaman ini memerlukan otorisasi. Anda dapat mencoba masuk atau mengubah direktori.
Akses ke halaman ini memerlukan otorisasi. Anda dapat mencoba mengubah direktori.
Menunjukkan bahwa prosedur eksternal memiliki nama lain dalam DLL-nya.
Komentar
Kata Alias kunci dapat digunakan dalam konteks ini:
Dalam contoh berikut, Alias kata kunci digunakan untuk memberikan nama fungsi dalam advapi32.dll, GetUserNameA, yang getUserName digunakan sebagai pengganti dalam contoh ini. Fungsi getUserName dipanggil di sub getUser, yang menampilkan nama pengguna saat ini.
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (
ByVal lpBuffer As String, ByRef nSize As Integer) As Integer
Sub GetUser()
Dim buffer As String = New String(CChar(" "), 25)
Dim retVal As Integer = GetUserName(buffer, 25)
Dim userName As String = Strings.Left(buffer, InStr(buffer, Chr(0)) - 1)
MsgBox(userName)
End Sub