How to get a form on top of all other windows

[racshuj]

I would like to know that how can I get a form on top of all other windows in such a manner that no new window can appear over it using visual basic

[sashi]

Hi there,

Kindly refer to below code segment, hope it helps. Good luck & Take care.

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
 
 
 
 
 
 
 
 
Global Const SWP_NOMOVE = 2
 
 
Global Const SWP_NOSIZE = 1
 
 
Global Const FLAGS = SWP_NOMOVE Or SWP_NOSIZE
 
 
Global Const HWND_TOPMOST = -1
 
 
Global Const HWND_NOTOPMOST = -2
 
 
 
 
 
 
 
 
Public Sub MakeTopMost(f As Form, v As Boolean)
 
 
    Dim success As Long
 
 
 
 
 
    If v Then
 
 
        success = SetWindowPos(f.hWnd, HWND_TOPMOST, 0, 0, 0, 0, FLAGS)
 
 
    Else
 
 
        success = SetWindowPos(f.hWnd, HWND_NOTOPMOST, 0, 0, 0, 0, FLAGS)
 
 
    End If
 
End Sub
 

I would like to know that how can I get a form on top of all other windows in such a manner that no new window can appear over it using visual basic