Alias 句 (Visual Basic)
外部プロシージャが DLL の中では別の名前で宣言されていることを示すキーワードです。
解説
Alias キーワードは、次のコンテキストで使用します。
次の例では、Alias キーワードを使用して advapi32.dll の関数 (GetUserNameA) の名前を指定し、この例の中ではこの関数の代わりに getUserName を使用しています。関数 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