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

注解

此 Alias 上下文中可以使用关键字:

Declare 语句

在以下示例中,关键字Alias用于在 advapi32.dll中提供函数的名称,GetUserNameAgetUserName该名称用于代替此示例。 函数 getUserName 在子 getUser中调用,显示当前用户的名称。

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

另请参阅

关键字