Hallo Patrick !!
versuchs mal so :
’ Deklarationen
Public Const SWP_SHOWWINDOW = &H40
Public Const HWND_TOPMOST = -1
Declare Function SetWindowPos Lib „user32“ (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long
’ Erklärung
’ hwnd = Window_handle ( also meistens me.hwnd)
’ hWndInsterAfter = gibt an wo in der Z-order das fenster stehen soll ( HWND_TOPMOST bedeutet immer im vordergrund )
’ x & y = linke obere ecke des fensters
’ cx & cy = breite und hoehe des fensters
’ wflags = mmh bedeutet soviel wie, was soll mit dem fenster gemacht werden ( also SWP_SHOWWINDOW zeigt das fenster an )
sub irgendwas()
setwindowpos(me.hwnd, HWND_TOPMOST, 0, 0, 200, 200, SWP_SHOWWINDOW)
end sub
viel glueck
gruss brain