Partilhar via


Cláusula Alias (Visual Basic)

Indica que um procedimento externo tem outro nome em sua DLL.

Observações

A Alias palavra-chave pode ser utilizada neste contexto:

Declaração de declaração

No exemplo a seguir, a Alias palavra-chave é usada para fornecer o nome da função em advapi32.dll, GetUserNameA, que getUserName é usada no lugar de neste exemplo. A função getUserName é chamada em sub getUser, que exibe o nome do usuário atual.

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

Consulte também