Salut,
Quand je démarre mon appli je vérifie s'il y en a une autre qui tourne. si
oui je veux arreter l'appli qui est de trop sans utiliser end.
sub main()
If App.PrevInstance = True Then
MsgBox "Le programme est déjà ouvert.", vbInformation + vbSystemModal
End 'c'est mal que
Else
MDIForm1.Show
End If
end sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Jacques93
Bonjour John Smith, John Smith a écrit :
Salut, Quand je démarre mon appli je vérifie s'il y en a une autre qui tourne. si oui je veux arreter l'appli qui est de trop sans utiliser end. sub main() If App.PrevInstance = True Then MsgBox "Le programme est déjà ouvert.", vbInformation + vbSystemModal End 'c'est mal que Else MDIForm1.Show End If end sub
Si tu enlèves le End, le programme sortira de la procédure Main et se terminera.
-- Cordialement,
Jacques.
Bonjour John Smith,
John Smith a écrit :
Salut,
Quand je démarre mon appli je vérifie s'il y en a une autre qui tourne. si
oui je veux arreter l'appli qui est de trop sans utiliser end.
sub main()
If App.PrevInstance = True Then
MsgBox "Le programme est déjà ouvert.", vbInformation + vbSystemModal
End 'c'est mal que
Else
MDIForm1.Show
End If
end sub
Si tu enlèves le End, le programme sortira de la procédure Main et se
terminera.
Salut, Quand je démarre mon appli je vérifie s'il y en a une autre qui tourne. si oui je veux arreter l'appli qui est de trop sans utiliser end. sub main() If App.PrevInstance = True Then MsgBox "Le programme est déjà ouvert.", vbInformation + vbSystemModal End 'c'est mal que Else MDIForm1.Show End If end sub
Si tu enlèves le End, le programme sortira de la procédure Main et se terminera.
