My.Application オブジェクト

[アーティクル]
08/16/2008

更新 : 2007 年 11 月

現在のアプリケーションに関するプロパティ、メソッド、およびイベントを提供します。

解説

My.Application オブジェクトから公開されるプロパティは、現在のアプリケーションまたは DLL に関連付けられたデータだけを返します。My.Application を使ってシステムレベルの情報を変更することはできません。

一部のメンバは、Windows フォームアプリケーションまたはコンソールアプリケーションだけで使用できます。

使用例

次のコード例は、My.Application.CommandLineArgs プロパティを使用して、アプリケーションのコマンドライン引数を確認します。/input= で始まる引数がある場合は、その引数の後続部分を表示します。

Private Sub ParseCommandLineArgs()
    Dim inputArgument As String = "/input="
    Dim inputName As String = ""

    For Each s As String In My.Application.CommandLineArgs
        If s.ToLower.StartsWith(inputArgument) Then
            inputName = s.Remove(0, inputArgument.Length)
        End If
    Next

    If inputName = "" Then
        MsgBox("No input name")
    Else
        MsgBox("Input name: " & inputName)
    End If
End Sub