Salut,
alors j'ai une fonction sur vb.net 2008 comme celui_ci :
et je veux récuperer les données séléctionnées d'un grid vers les textbox comme ça :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 Public Function Get_values(ByVal col As Integer, ByVal grid As DataGridView) As VariantType Dim b As VariantType grid.Select() b = Int(grid.CurrentRow().Index) Get_values = grid.Item(col, b).Value End Function
'appel du function :Get_values(1, Gfor)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8 If Gfor.CurrentRow.Cells.Item(0).Value.ToString <> "" Then Tnom.Text = Get_values(1, Gfor) Tadresse.Text = Get_values(2, Gfor) Tphone.Text = Get_values(3, Gfor) Tmail.Text = Get_values(4, Gfor) End If
mais elle me donne toujours un msg d'erreur :
(la conversation de la chaine "aaaa" en type integer)
noter que : aaaa est la valeur que je veux récupérer
(Tnom.Text = Get_values(1, Gfor))
j'ai fais Tnom.Text = cstr(Get_values(1, Gfor))
mais meme msg d'erreur s'affiche.
merci de votre aide.
Partager