Bagikan melalui


Klausul Alias (Visual Basic)

Menunjukkan bahwa prosedur eksternal memiliki nama lain dalam DLL-nya.

Komentar

Kata Alias kunci dapat digunakan dalam konteks ini:

Deklarasikan Pernyataan

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

Lihat juga