Partager via


Alias, clause (Visual Basic)

Indique qu’une procédure externe a un autre nom dans sa DLL.

Notes

Le mot clé Alias peut être utilisé dans ce contexte :

Declare Statement

Dans l’exemple suivant, le mot clé Alias est utilisé pour fournir le nom de la fonction dans advapi32.dll, GetUserNameA. getUserName est utilisé à sa place dans cet exemple. La fonction getUserName est appelée dans sub getUser, qui affiche le nom de l’utilisateur actuel.

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

Voir aussi