Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Imports System.Runtime.InteropServices
- Module Window
- <DllImport("user32.dll", SetLastError:=True, CharSet:=CharSet.Auto)> Public Function FindWindowEx(ByVal parentHandle As IntPtr, ByVal childAfter As IntPtr, ByVal lclassName As String, ByVal windowTitle As String) As IntPtr
- End Function
- <DllImport("user32.dll")> Public Function SetParent(ByVal hWndChild As Integer, ByVal hWndNewParent As Integer) As Integer
- End Function
- <DllImport("user32.dll")> Public Function SetWindowLong(ByVal hwnd As Integer, ByVal nIndex As Integer, ByVal dwNewinteger As Integer) As Integer
- End Function
- <DllImport("user32.dll")> Public Function MoveWindow(ByVal hWnd As IntPtr, ByVal x As Integer, ByVal y As Integer, ByVal nWidth As Integer, ByVal nHeight As Integer, ByVal bRepaint As Boolean) As Boolean
- End Function
- <DllImport("user32.dll")> Public Function ShowWindow(ByVal hWnd As Integer, ByVal nCmdShow As Integer) As Integer
- End Function
- Public Const GWL_STYLE = (-16)
- Public Const WS_CHILD = &H40000000
- Public Const WS_VISIBLE = &H10000000
- End Module
Add Comment
Please, Sign In to add comment