[vb] msgbox in primo piano

[Boldan]

Innanzitutto premetto che (dall'esperienza che ho avuto) non puoi visualizzare un msgbox sempre in primo piano.
Devi costruirti una form per visualizzare tale messaggio alla quale (attraverso un API) dai la proprietà StayOnTop.
Tale API è la seguente:

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

Const HWND_TOPMOST = -1
Const SWP_NOMOVE = &H2
Const SWP_NOSIZE = &H1
            
Private Sub Form_Load()
    SetWindowPos Me.hWnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE
End Sub

Spero sia abbastanza chiaro, fammi sapere...

Ciao!!:master: