Cláusula Alias (Visual Basic)

  • Artigo

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

Comentários

A palavra-chave Alias pode ser usada neste contexto:

Instrução Declare

No exemplo a seguir, a palavra-chave Alias é usada para fornecer o nome da função no advapi32.dll, GetUserNameA, que getUserName é usada 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

Confira também