Connaitre le nom d'une form à partir du caption ou comment lister toutes les for

Question

Re tout le monde les gens !

Décidément, je collectionne les problemes tout cons mais dont je ne vois la solution ! :(

Encore une fois, la question est dans le titre

 @Z3RtY25 ==

crenaud76 · Answer

Voici un moyen infaillible de retrouver une form d'apres son caption. Qu'il s'agisse d'une MDIChild ou pas d'ailleur !!


Function GetFormByCaption(ByVal Caption as String) as Form
Dim F As Form

 For Each F In Forms
   If F.Caption = Caption Then
     Set GetFormByCaption = F
     Exit Function
    End If
 Next
 Set GetFormByCaption = Nothing
End Function


Cette fonction retourne la form recherchée ou Nothing si aucune form n'existe avec ce caption.

Christophe R.

cs_azerty25 · Answer

Wouw, j'aurai jamais pensé essayer ceci. Merci pour ton aide ;)
Mais j'y pense, comment apelle t-on Forms ? Une collection ?

 @Z3RtY25 ==

crenaud76 · Answer

Oui c'est la collection de fenêtre active de l'appli.
En règles générale, en VB les choses qui sont au pluriels sont une collections de leur singulier !
C'est relativement simpliste comme système de mémorisation mais c'est efficace,e t personnellement, je m'éfforce de le respecter pour mes propres classes objet et classes collection.

Christophe R.

Polack77 · Answer

Heeee, bonjour, je ne sais pas si cette discution est toujour d'actualité (en faite je sais que non mais bon...).
Je cherche exactement ça mais pour VB.NET et le code données plus haut me retourne une erreur : "Expression is of type 'WindowsApplication1.My.MyProject.MyForms', which is not a collection type."
Ce que je teste :
For Each Item As Form In My.Forms

 Help, Merci 

Amicalement 
Pensez "Réponse acceptée"

Connaitre le nom d'une form à partir du caption ou comment lister toutes les for

4 réponses

Discussions similaires