Aurel62190
Messages postés22Date d'inscriptiondimanche 21 juin 2009StatutMembreDernière intervention 7 septembre 2009
-
6 sept. 2009 à 20:25
Aurel62190
Messages postés22Date d'inscriptiondimanche 21 juin 2009StatutMembreDernière intervention 7 septembre 2009
-
7 sept. 2009 à 13:42
Bonjour à tous, comme je l'ai précisé dans le titre, je suis bloqué.
J'ai :
Private sub Bouton1_click()
If ....... Then
Verification ...., .....
End If
End Sub
Function Verification (...., .....)
If ...... Then
[ ]
End If
End Verification
Entre les crochets, Comment je peux faire pour arrêter "Private sub Bouton1_click() ?
Si je mets "Exit Function", il bloque la fonction mais reviens automatiquement à "Private sub Bouton1_click()", et ça n'est pas ce que je recherche..., je veux bloquer la fonction maître.
Merci d'avance...
A voir également:
Est-il possible de bloquer une fonction par une autre fonction ?
PCPT
Messages postés13272Date d'inscriptionlundi 13 décembre 2004StatutMembreDernière intervention 3 février 201847 6 sept. 2009 à 21:17
salut,
ta fonction sert à quoi, si elle ne retourne rien...
[hr]Function Verification (...., .....) as boolean
If ...... Then
[...]
'retourner le fait de quitter ou non (par exemple => retourne VRAI si OK, FALSE si doit quitter)
Verification = true
else
Verification = false
End If
[hr]Private sub Bouton1_click()
If ....... Then
if not Verification (...., .....) then exit sub
End If
End Sub
Aurel62190
Messages postés22Date d'inscriptiondimanche 21 juin 2009StatutMembreDernière intervention 7 septembre 20091 7 sept. 2009 à 11:53
En faite PCPT,
Ce que je fais c'est que j'utilise un treeview qui sert de projet. Les nodes à l'intérieur représente des fichiers et dossiers du projet. J'y intègre l'élément "supprimer". Si je décide de supprimer un dossier, je dois vérifier si les fichiers à l'intérieur de ce dossier ne sont pas ouverts (s'ils sont ouverts je ne peux pas le supprimer). Donc la fonction en question sert à verifier si les nodes ont des enfants ... si ces enfants n'ont pas d'autres enfants..... etc... donc la fonction verification sert à controler tous ça, et pour finir elle tourne en boucle, c'est à dire :
Function verification(..... , ....)
If machin = truc then
verification ..... , .....
else
Exit Function
End If
End Function
Enfin bon, tous ça pour dire que la fonction sert à quelque chose.
Je vais essayer avec "As Boolean" et je te tiens au courant...