Stocker le nom du form dans une variable

Bonjour,
8-)

je veux inserer des bouton Précédent et suivant dans mon application,
donc, VB6 n'offre pas d'historique de navigation,
pour cette raison j'ai trouver une autre sol ;)
je doit stoquer dans un tableau de dimention (nbre form * 2) l'historique de navigation;
j'explique :

si la Form1 est en cour d'execution et je clique sur un bouton Form2 voici le code que j'ai utilisé :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

'Module public Navigation(5,1) as string   'Form1 Private Sub Frm_FORM2_Click() Navig(2, 0) = "Form1" ' a utiliser ultérieurement dans le bouton Précedant 'de Form2 Navig(0,1 ) = "Form2" ' a utiliser ultérieurement dans le bouton suivant 'de Form1 Me.Hide Form2.Show vbNormal   End Sub

---

y'a t'il une possibilité de stocker le nom du form dans une variable de tel sorte lorsque je clique sur un bouton la form qui va s'execute c'est la form que son nom est stocké dans cette variable

merci d'avance

Code:

---

1 2 3 4 5 6

Select Case MaVariable Case "Form1" Form1.Show Case "Form2" Form2.Show End Select

---

salut

Il serait plus astucieux de stocker dans ta variable mavariable l'index de la Form au lieu de son nom, puis d'utiliser la collection Forms :

Code:

---

Forms(mavariable).show

---

A ce que je sache, l'objet Form ne possède pas de propriété Index.

Sinon, j'aimerais en avoir un exemple.

Citation:

---

Envoyé par l_autodidacte

A ce que je sache, l'objet Form ne possède pas de propriété Index.

Sinon, j'aimerais en avoir un exemple.

---

toute collection est constituée d'articles indexés. Forms est une collection (celle des objets Form). Pour le reste (l'exemple que tu demandes) : simple : essaye toi-même ceci, par exemple, sur un bouton de commande d'une form :

Code:

---

Msgbox Forms(0).name

---

te retournera le nom de la form d'index 0 dans la collection Forms, en supposant que cette Form soit chargée (la collection Forms est constituée des Forms chargées). Mais tu gagneras du temps en regardant dans MSDN ce que sont :
- les collections en général
- la collection Forms en particulier. ;)

Dire que j'utilise souvent la collection Forms sans avoir pensé à cela.... tout simplement parce que dans la page de propriétés d'un objet Form la propriété Index n'existe pas.
On ne peut jamais prétendre tout connaître sinon on serait Prophète au temps où on s'y attend pas, et encore.
We live and learn comme dit le proverbe.

Merci pour la précision.