in pratica nel form unload eseguo questo codice, ma non funziona

Private Sub Form_Unload()
If App.PrevInstance = True Then
MsgBox ("istanza giā in esecuzione")
Unload Me
Else
MsgBox ("esegui pure ")
End If
End Sub

cosa sbaglio?