Dim p As Point

            p = Me.Location

            Dim fX As New System.IO.StreamWriter( "c:\e.X.txt", False)

            fX.WriteLine(p.X) : fX.Close() : fX.Dispose()

            Dim fY As New System.IO.StreamWriter("c:\e.Y.txt", False)

            fY.WriteLine(p.Y) : fY.Close() : fY.Dispose()