Salut
J'ai un tableau à remplir au fur et à mesure, mais j'ai besoin de savoir à partir de quelle position pour ne pas écraser les données déjà présentes.
Pour info, je ne dois pas utiliser de base de données pour ce projet.
Je récupère chaque nouvelle valeur d'un textbox, que j'insère dans une listbox, et j'affecte toutes les valeurs de la listbox dans le tableau. C'est quand je recommence cette action que j'écrase les données du tableau.
Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21 'Déclarations Public TabNouvellesVilles(1 To MaxNbVilles) As String Dim i As Integer Dim nb_nouv_villes As Integer 'Calcul du nombre de villes nb_nouv_villes = lst_nouvelles_villes.ListCount ' Si le tableau est vide If TabNouvellesVilles(1) = "" Then For i = 1 To nb_nouv_villes TabNouvellesVilles(i) = lst_nouvelles_villes.List(i) Next i 'Si le tableau n'est pas vide ElseIf TabNouvellesVilles(1) <> "" Then For i = ? To ? + nb_nouv_villes TabNouvellesVilles(i) = lst_nouvelles_villes.List(i) Next i End If![]()
Partager