[VB.NET] Aprire cartella in cui si trova l'eseguibile

[gibra]

Dim aPath As String = Application.StartupPath()