Discussion :

[wa7ch3000]

Bonjour,


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 :

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

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

[Delbeke]

Code :

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

1
2
3
4
5
6
Select Case MaVariable
Case "Form1"
  Form1.Show
Case "Form2"
  Form2.Show
End Select

[babaothe]

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 :

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

Forms(mavariable).show

[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.

[babaothe]

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 :

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

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.

[l_autodidacte]

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.