次の方法で共有


Alias 句 (Visual Basic)

外部プロシージャの DLL に別の名前があることを示します。

注釈

Alias キーワードは、次のコンテキストで使用できます。

宣言ステートメント

次の例では、Alias キーワードを使用して、この例の代わりにgetUserNameadvapi32.dllGetUserNameA関数の名前を指定します。 関数 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

こちらも参照ください