(encore) tableaux en vb.net
MacUser
-
MacUser -
MacUser -
Bonjour,
je développe un utilitaire en vb.net (2008), et j'ai un problème de tableau. Ni ccm, ni google n'ont pu m'aider!
je cherche a créer un tableau de type : MonTab(i)(y), sauf que je ne connais pas 'i' (je le remplis à partir d'une fichier texte).
Voici mon code du moment :
le problème est que ma liste n'est pas initialisé, alors je ne peux rien faire avec (ma boucle ne fonctionne pas.)
Comment initialiser ma liste sans savoir le nombre de lignes?
je développe un utilitaire en vb.net (2008), et j'ai un problème de tableau. Ni ccm, ni google n'ont pu m'aider!
je cherche a créer un tableau de type : MonTab(i)(y), sauf que je ne connais pas 'i' (je le remplis à partir d'une fichier texte).
Voici mon code du moment :
Dim liste '(NbLignes, 3)
Dim compteur As Integer = 0
If File.Exists(cPath & cFileName) Then 'si le fichier existe (évite explosions)
Dim tempIp As String
sr = New StreamReader(cPath & cFileName)
While sr.EndOfStream = False
tempIp = sr.ReadLine
liste(compteur)(0) = tempIp
liste(compteur)(1) = 0
liste(compteur)(2) = "Tout va bien"
End While
sr.Close()
End If
le problème est que ma liste n'est pas initialisé, alors je ne peux rien faire avec (ma boucle ne fonctionne pas.)
Comment initialiser ma liste sans savoir le nombre de lignes?
A voir également:
- (encore) tableaux en vb.net
- Mise en forme tableau word - Guide
- Tableaux croisés dynamiques - Guide
- Fusionner deux tableaux excel - Guide
- Triez le tableau pour que les villes les plus peuplées soient en haut excel - Guide
- Afficher un tableau en c - Forum C
1 réponse
^^
j'ai trouvé.
je récupère le nombre de lignes de mon fichier dans une var (pNbLignes) que je passe en paramètre à ma fonction, et je m'en sers pour le nombre de lignes dans mon tableau:
j'ai trouvé.
je récupère le nombre de lignes de mon fichier dans une var (pNbLignes) que je passe en paramètre à ma fonction, et je m'en sers pour le nombre de lignes dans mon tableau:
Function fn_remplirListe(ByVal pNbLignes)
Dim sr As StreamReader
Dim compteur As Integer = 0
Dim liste(pNbLignes, 2) '(i)(3) '(NbLignes, 0)
If File.Exists(cPath & cFileName) Then 'si le fichier existe (évite explosions)
Dim tempIp As String
sr = New StreamReader(cPath & cFileName)
While sr.EndOfStream = False
tempIp = sr.ReadLine
liste(compteur, 0) = tempIp
liste(compteur, 1) = 0
liste(compteur, 2) = "Tout va bien"
compteur = compteur + 1
End While
sr.Close()
End If
Return liste
End Function
