実行しているアプリケーションのパスを取得 - VB

'自分自身の実行ファイルのパスを取得する
Dim appPath As String =  System.Reflection.Assembly.GetExecutingAssembly().Location

*.exeが取得できる

実行しているアプリケーションのフォルダパスの取得

Dim appPath As String =  System.Reflection.Assembly.GetExecutingAssembly().Location
appPath .Substring(0, InStrRev(appPath , "\"))

---

参考文献

自分のアプリケーションの実行ファイルのパスを取得する、VB6のApp.Pathと同じ事を行うには？: .NET Tips: C#, VB.NET