Far apparire un Balloon, quando si passa con il mouse su un menu

Il caso in questione è quello in cui si vuole far apparire un Balloon su un Menu, passandoci sopra con il puntatore del mouse.

Provvederemo a porre una Label sul Form (purché questa non dia fastidio ad eventuali altri oggetti prossimi al Menu) proprio in modo contiguo al Menu.
Verrà, quindi, così sollevato l'evento _Enter, quando il mouse entrerà nella Label:

Public Sub Label1_Enter()

' Qui un comando qualsiasi... ad esempio:
    Balloon.Warning("Attenzione ! Prova !", Label1)
 End

Un'alternativa può essere quella di verificare il passaggio del mouse nell'area del Menu, tenendo conto delle coordinate .X ed .Y assunte dal puntatore del mouse ad ogni suo spostamento. In questo secondo caso, però, la verifica potrà avvenire solo se il mouse viene spostato mantenendo premuto un suo tasto.

Esempio:

Public Sub Form_MouseMove()
 
 Select Case Mouse.X
   Case 15 To 50
     If Mouse.Y < 20 Then Print "Il mouse sta passando sul Menu !"
 End Select
 
End