共用方式為

Alias 子句 (Visual Basic)

  • 發行項

指出外部程序在其 DLL 中有另一個名稱。

備註

Alias 關鍵字可用於以下內容：

Declare Statement

在下列範例中，Alias 關鍵字是用於在 advapi32.dll 中提供函式的名稱 (GetUserNameA)，而 getUserName 在此範例中為取代作用。 在子函式 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

另請參閱