add GetExecutablePath()

Pilz.Win32/Native/Kernel32.vb

@@ -0,0 +1,16 @@
+Imports System.Runtime.InteropServices
+Imports System.Text
+
+Namespace Native
+
+    Public Class Kernel32
+
+        Private Const LIB_KERNEL32 As String = "kernel32.dll"
+
+        <DllImport(LIB_KERNEL32)>
+        Public Shared Function GetModuleFileName(hModule As IntPtr, lpFilename As StringBuilder, nSize As Integer) As UInteger
+        End Function
+
+    End Class
+
+End Namespace

Pilz.Win32/Native/User32.vb

@@ -4,11 +4,13 @@ Namespace Native
 
     Public Class User32
 
-        <DllImport("user32")>
+        Private Const LIB_USER32 As String = "user32.dll"
+
+        <DllImport(LIB_USER32)>
         Public Shared Function GetWindowRect(ByVal hWnd As IntPtr, ByRef r As RECT) As Boolean
         End Function
 
-        <DllImport("user32.dll")>
+        <DllImport(LIB_USER32)>
         Public Shared Function ChildWindowFromPointEx(ByVal hWndParent As IntPtr, ByVal pt As POINT, ByVal uFlags As UInteger) As IntPtr
         End Function