Visual Basic - sabe VB cual es el directorio actual???

quiero saber si hay alguna manera de que un programa creado en visual basic al correrlo sepa en que directorio se esta ejecutando para que despues pueda asignarle a una variable esa direccion....muchas gracias

ESPERO TE SIRVA

Private Sub Form_Load()
Dim Directorio As String
ChDir App.Path
ChDrive App.Path
Directorio = App.Path
If Len(Directorio) > 3 Then
Directorio = Directorio & "\"
Text1.Text = Directorio
End If
End Sub