Déclarer plusieurs variables similaires par une boucle
damiengarnier
Messages postés8Date d'inscriptionvendredi 3 avril 2009StatutMembreDernière intervention16 avril 2009
-
15 avril 2009 à 17:57
damiengarnier
Messages postés8Date d'inscriptionvendredi 3 avril 2009StatutMembreDernière intervention16 avril 2009
-
16 avril 2009 à 16:51
Bonjour,
J'aimerais déclarer et instancier plusieurs variables par une boucle du style :
Dim i as integerFor i 0 to i [x]
Dim Variable(i) as Type = New Type
Next
pour avoir comme résultat :
Dim Variable1 as Type = New Type
Dim Variable2 as Type = New Type
Dim Variable3 as Type = New Type
Dim Variable4 as Type = New Type
Dim Variable5 as Type = New Type
...
Dim Variable[x] as Type = New Type
J'ai remarqué en essayant le code un peu plus haut que cela n'est pas faisable. En effet, Visual Basic m'annonce que "une initialisation explicite n'est pas autorisée pour les tableaux déclarés avec des limites explicites".
Merci d'avance
A voir également:
"Server api" "php version 4.4.6" "build date" "php variables"
damiengarnier
Messages postés8Date d'inscriptionvendredi 3 avril 2009StatutMembreDernière intervention16 avril 2009 16 avril 2009 à 12:52
Bonjour Renfield et merci de m'aider.
Je ne crois pas que cela soit la solution.
En fait, je ne veux pas déclarer un tableau de x lignes.
Je vais prendre un exemple concret :
J'ai un MainForm dans lequel est placé un TableLayoutPanel de 5 colonnes par 5 lignes.
Dans chaque cellule du TableLayoutPanel, je veux placer un DataGridView.
Avant de les placer, il faut que je déclare et instancie 25 DataGridView comme suit :
Dim DatGridView1 As DataGridView = New DataGridView
Dim DatGridView2 As DataGridView = New DataGridView
Dim DatGridView3 As DataGridView = New DataGridView
Dim DatGridView4 As DataGridView = New DataGridView
Dim DatGridView5 As DataGridView = New DataGridView
Dim DatGridView6 As DataGridView = New DataGridView
Dim DatGridView7 As DataGridView = New DataGridView
Dim DatGridView8 As DataGridView = New DataGridView
Dim DatGridView9 As DataGridView = New DataGridView
Dim DatGridView10 As DataGridView = New DataGridView
...
Dim DatGridView25 As DataGridView = New DataGridView
Ensuite, je place par code ces 25 DataGridView dans leurs cases respectives.
Au lieu d'écrire 25 lignes de code de déclaration, j'aurais aimé savoir s'il était possible de déclarer toutes les variables par une boucle qui ne représente que quelques lignes et ainsi construire une procédure que je peux appeler depuis la procédure d'événement avec comme argument le nombre de variable et leur type.
J'espère avoir été clair et merci d'avance pour votre aide.
damiengarnier
Messages postés8Date d'inscriptionvendredi 3 avril 2009StatutMembreDernière intervention16 avril 2009 16 avril 2009 à 16:26
Tu veux dire que je dois déclarer un tableau de 25 cases contenant donc 25 DataGridView par exemple de cette façon :
Dim DataGridViewTable(25) as DataGridView
Mais ensuite, comment je fais pour placer les DataGridView dans les cellules correspondantes de mon TableLayoutPanel?
Excuse moi, même si j'ai quelques notions de VB, je suis loin d'être un expert...
Vous n’avez pas trouvé la réponse que vous recherchez ?
damiengarnier
Messages postés8Date d'inscriptionvendredi 3 avril 2009StatutMembreDernière intervention16 avril 2009 16 avril 2009 à 16:51
Mmmm...
J'ai un problème qui apparaît.
Code :
Private Sub CommercialTableauDeBordCompletToolStripMenuItem_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) _
Handles CommercialTableauDeBordCompletToolStripMenuItem.Click
'Chargement MainPanel 3 colonnes x 3 lignes
LoadMainPanel(3, 3)
'Déclaration des 7 WebBrowser dans un tableau
Dim Graphique(6) As WebBrowser
'Ajout des Graphiques dans chaque cellule de MainPanel
MainPanel.Controls.Add(Graphique(0), 0, 0)
MainPanel.Controls.Add(Graphique(1), 1, 0)
MainPanel.Controls.Add(Graphique(2), 2, 0)
MainPanel.Controls.Add(Graphique(3), 0, 1)
MainPanel.Controls.Add(Graphique(4), 1, 1)
MainPanel.Controls.Add(Graphique(5), 2, 1)
MainPanel.Controls.Add(Graphique(6), 1, 2)
'Configuration graphique des contrôles apartenant à MainPanel
ConfigGraphMainPanel()
End Sub
J'ai une erreur au débogage : "La référence d'objet n'est pas définie à une instance d'un objet."
Comment fait-on pour instancier les variables contenues dans mon tableau?