If App.Previnstance Then...
MsgBox ("Se ne vuoi 2 paga!")
End
Ovviamente è un controllo che fai all'avvio