Compartilhar 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 usada neste contexto:

Instrução Declare

No exemplo a seguir, a Alias palavra-chave é usada para fornecer o nome da função em advapi32.dll, GetUserNameAque getUserName é usado no lugar deste exemplo. A função getUserName é chamada no 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