Alias 子句 (Visual Basic)

指示外部过程在其 DLL 中具有另一个名称。

备注

Alias 关键字可用于下面的上下文中：

Declare 语句

在下面的示例中，使用 Alias 关键字提供 advapi32.dll 中函数 GetUserNameA（在本例中改用 getUserName）的名称。 在 sub getUser 中，调用了函数 getUserName，该函数显示当前用户的名称。

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

请参见

其他资源

关键字 (Visual Basic)