Index Hors Limite après Split

Bonjour à tous,

Je fais appel à vous car j'ai un problème que je ne parviens pas à comprendre / régler.

Après avoir récupéré mes données avec une requête SQL et les intégrer dans un Datagridview, j'ai besoin de faire un Split sur une colonne pour récupérer seulement une partie de la valeur.
Jusque là pas de problème.
Seulement lorsque je veux attribuer le résultat à une variable, j'ai une erreur de type Index Hors Limite du tableau.

Pourtant lorsque je fais un test en demandant d'écrire le résultat dans un MsgBox, ça fonctionne.

Voici mon petit bout de code qui me bloque:

Les données du DGV sont au format "AB001-123456"

Code:

---

1 2 3 4 5 6

For i = 0 To DataGridView1.Rows.Count - 1   Dim Acces = DataGridView1.Rows(i).Cells.Item("AccessionNumber").Value Dim temp() = Split(Acces, "-") Dim acn As Integer = temp(1) Next

---

Donc si je demande Msgbox(temp(1)) Ca fonctionne

Mais avec la ligne Dim acn As Integer = temp(1) ça bloque

Pourriez-vous m'expliquer ce qui coince, je vous en serais très reconnaissant.

Merci d'avance

Jérôme

Salut

split pour ton cas renvoie un tableau de string Dim acn As Integer = Cint(temp(1)) pourrait être la solution ?

Bonjour

La boucle For jusque Count-1 doit probablement être jusque Count-2 si le DataGridView contient une ligne vide à la fin (c'est souvent le cas).

Si c'est le problème et que tu n'as pas besoin de cette ligne vide, il faut changer à False la propriété AllowUserAddRow du DGV (vérifier le nom de cette propriété, je ne peux le faire avec mon Smartphone).
Si tu fais ce changement alors la boucle jusque Count-1 est correcte.

Bonne journée... :)

Bonjour,
j'ajoute une fonction de conversion de type!

Code:

---

1 2 3 4 5 6 7

Function StringToInteger(V As Object) As Integer Try Return CInt(V) Catch ex As Exception Return 0 End Try End Function

---

je scan mon DataGridView1

Code:

---

1 2 3 4

For Each r As DataGridViewRow In Me.DataGridView1.Rows Dim acn As Integer = StringToInteger($"{r.Cells.Item("AccessionNumber").Value.ToString}-".Split("-")(1).ToString) MessageBox.Show(r.Cells.Item("AccessionNumber").Value) Next

---

06/05/2022, 07h50
Phil Rob
Bonjour

La boucle For jusque Count-1 doit probablement être jusque Count-2 si le DataGridView contient une ligne vide à la fin (c'est souvent le cas).

Si c'est le problème et que tu n'as pas besoin de cette ligne vide, il faut changer à False la propriété AllowUserAddRow du DGV (vérifier le nom de cette propriété, je ne peux le faire avec mon Smartphone).
Si tu fais ce changement alors la boucle jusque Count-1 est correcte.


C'était bien ça.

Un grand Merci :)

J'avais déja converti en Integer mais effectivement je ne l'avais pas pris dans le copier-coller pour lancer le sujet.

Merci à tous