Discussion :

[sodidaire]

Bonjour à tous

Je dévéloppe une application qui compte une vingtaine de FORM
nommée de FRM01 à FRM20.

Une procédure d'initialisation est identique aux 20 FORM.

Actuellement cette procédure est reportée 20 fois et j'y passe à chaque form.load.
Certaine instruction contiennent le nom de la FORM

ex : FRM02.Visible=true

Je souhaiterai n'en avoir qu'une et passer le nom de la FORM en paramètre.

Je tente de constituer une table (ECRAN(20)) et je tente d'utiliser ce nom pour
les procédures...

je ne suis pas sur la bonne piste...

ex :

A = Me.name

A contient "FRM01"

dans ma proc je tente d'utiliser A

A.Visible=true

cela ne fonctionne pas

Je cherche une info sur la manipulation des FORM

Solidairement Vôtre

[Delbeke]

Je pense que la solution est de passer par une sub publique placée dans un module séparé

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Option Explicit
 
Public Sub InitForm(frm As Form)
   frm.BackColor  =  VbCyan    'exemple d'intialisation de proprété de la form
   frm.Text1.Text = frm.Caption
End Sub

Dans Le Form_Load de chaque feuille
faire

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

InitForm Me

[sodidaire]

Merci de cette information.

Cela fonctionne sans accrocs.

Je suis sans voix ! (je fouille les documentations depuis très longtemps.)

J'ai encore pas mal de chemin à faire