'Çalışan programınızda yeni bir form açıldığında bunun en 'üstte görünmesi için; örn 2 form oluşturun form1_load 'a
'form2.Show ,me
'yazın.
'Bu yöntem yalnızca programınızdaki formlar için geçerlidir. Diğer bir program çalıştığında bunun üzerini örtebilir.
'Tüm uygulamaların üzerinde kalan bir form
'oluşturmak için; declare kısmına
Private 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
Private Const SWP_NOMOVE = &H2
Private Const SWP_NOSIZE = &H1
Private Const HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2
En üstte kalmasını istediğinizde:
SetWindowPos hwnd, _
HWND_TOPMOST, 0, 0, 0, 0, _
SWP_NOMOVE + SWP_NOSIZE
Bu özelliği geri almak için:
SetWindowPos hwnd, _
HWND_NOTOPMOST, 0, 0, 0, 0, _
SWP_NOMOVE + SWP_NOSIZE