実行可能ファイルが格納されたパスを、その実行可能プログラムの実行時にそのプログラムで取得しようとして、
以下のようにコーディングすると、フォームが参照して開くフォルダのパスが取得されてしまい、
実行可能ファイル自体のパスを取得できないことがあります。

Private Sub Form_Load()
MyPath = CurDir$
End Sub

実行可能ファイル自体のパスを確実に取得するにはどうすればよいのでしょうか？