VB.NET中怎么找到EXE程序所在的路径

VB.NET中如何找到EXE程序所在的路径
我要把一个数组写入一个.dat文件，.dat文件需要随放在exe所在的文件夹中，需要确定.dat文件所在的位置，我写了如下程序：

Dim FilePath As New System.IO.StreamWriter("AppDomain.CurrentDomain.BaseDirectory：/1.dat", False)
并且将1.dat文件放入了D:\VBwenjian\机力塔VB程序开发\jilita\jilita\bin\Debug文件夹中，运行后提示：

未能找到路径“D:\VBwenjian\机力塔VB程序开发\jilita\jilita\bin\Debug\AppDomain.CurrentDomain.BaseDirectory：\1.dat”的一

请问该如何解决？
------解决思路----------------------
Dim FilePath As New System.IO.StreamWriter(AppDomain.CurrentDomain.BaseDirectory & "\\1.dat", False) 要这样
------解决思路----------------------
AppDomain.CurrentDomain.BaseDirectory