Try this: My.Application.Info.DirectoryPath
[MSDN]
This is using the My
feature of VB.NET. This particular property is available for all non-web project types, since .NET Framework 2.0, including Console Apps as you require.
As long as you trust Microsoft to continue to keep this working correctly for all the above project types, this is simpler to use than accessing the other "more direct" solutions.
Dim appPath As String = My.Application.Info.DirectoryPath