Discussion :

[Crokflo]

Bonjours les programmeurs,

Après 3 jours de recherche sur les forums et maints essais je viens demander de l'aide. Voilà je développe un petit programme en VB.net, je souhaite pouvoir effectuer une recherche dans une datagrid, sélectionner cette ligne et la modifier. J'ai surfé sur les forums j'ai trouvé plein de code mais qui été vraiment bien long et complexe. Existe-t-il une manière des plus simples pour rechercher une donnée dans un datagrid grâce à une textbox et la modifier par la suite. Faut 'il obligatoirement utiliser un BindingSource?

Voila en espérant avoir été des plus claires.
Merci d'avance

[Shadam]

Tu pourais montrer ton code parce que là ce n'est pas vraiment évident de comprendre ce que tu veux faire...

Si c'est pour trouver la valeur de ta comboBox et si c'est un String :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
For Each row As DataGridViewRow in maDataGrid.Rows
    If row.Cells.Item("maColonne").Value.ToString.Equals(maComboBox.Text) Then
        'Ton traitement
    End If
Next

[Crokflo]

Oui Dsl pour le code mais j'ai encore rien de bien structuré, et tu as vue trés juste, c'est le code que j'attendais. (Dire que ce n'étais pas grand chose)
Seulement il me met une erreur:

La référence d'objet n'est pas définie à une instance d'un objet.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 For Each row As DataGridViewRow In DataGridView1.Rows
            If row.Cells.Item("Column1").Value.ToString.Equals(TextBox3.Text) Then
                nom.Text = "ça MArche"
            End If
        Next

Sinon ce code compare les valeurs de ma colonne et ma textbox, mais des fois il ne récupere pas le numéro de la ligne quelquepart ??

[Shadam]

Tu peux mettre le code complet ou au moins la fonction qui bloque si c'est trop long

[Crokflo]

Oui si tu veux je met le plus interesssant.
La fonction qui bloque c'est celle que j'ai mis plus haut.

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
22
23
24
25
26
27
28
29
30
31
32
33
Imports System.IO
Imports System.Text
Public Class Form1
    Dim categorie, jour As String
    Dim numero As Integer = 1
 
    Private Sub Form1_Load() Handles MyBase.Load
        nom.Focus()
    End Sub
 
'Cette fonction sert à envoyer des valeurs dans la datagrid sur 5 colones
    Private Sub add_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles add.Click
        Groupe()
        Dim row0 As String() = {nom.Text, prenom.Text, categorie, jour, numeros.Text}
        Me.DataGridView1.Rows.Add(row0)
        numero = numeros.Text
        numero = numero + 1
        numeros.Text = numero
        nom.Clear()
        prenom.Clear()
        nom.Focus()
    End Sub
 
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
'Ici je veux pouvoir rechercher une valeur dans la colone 1 de la datagrid
qui correspond à celle de la TextBox3         
For Each row As DataGridViewRow In DataGridView1.Rows
            If row.Cells.Item("Column1").Value.ToString.Equals(TextBox3.Text) Then 'ICI QUE ARRIVE LE PROBLEME
                nom.Text = "G reussi"
            End If
        Next
    End Sub

Voila ^^ en espérant que cela t'aide
MErci d'avance

[Shadam]

Tu as des lignes dans ta DGV avant de lancer ta recherche ?

Sinon tente ce test avant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
If DataGridView1.Rows.Count > 0 Then
    For Each row As DataGridViewRow In DataGridView1.Rows
            If row.Cells.Item("Column1").Value.ToString.Equals(TextBox3.Text) Then 'ICI QUE ARRIVE LE PROBLEME
                nom.Text = "G reussi"
            End If
        Next
End If

[Crokflo]

Oui j'ai des lignes avant de faire la recherche.
Et non cela ne change rien toujours le message

La référence d'objet n'est pas définie à une instance d'un objet.

des fois j'arrive à me corriger mais la je vois pas du tout ce que cette phrase veut dire.

[Shadam]

Ca veut dire que tu es en train de faire un test sur une variable qui n'a pas été instanciée (c'est pourquoi je te demandais si tu avais des lignes )

Essaies de remplacer "Column1" par l'index de colonne sinon (c'est à dire 0) dans ton test.

[Crokflo]

J'ai trouver le problème. J'ai fait du Pas à Pas et le code marche bien et c'est quand il arrive en fin de colonne qu'il déconne.

Aurait tu une idée pour résoudre le problème? j'ai écrit un bout de code mais c'est moche.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
    Private Sub Button1_Click() Handles Button1.Click
        If DataGridView1.Rows.Count > 0 Then
            For Each row As DataGridViewRow In DataGridView1.Rows
                If row.Cells.Item("Column1").Value.ToString.Equals(TextBox3.Text) Then                     nom.Text = "G reussi"
                    If t = DataGridView1.Rows.Count Then
                        Return
                    End If
                    t = t + 1
                End If
            Next
        End If
 
    End Sub

Ps: Réédition je viens de voir ton message. Je vois pas trop ce que tu veux parler pour "index de colone" cela correspond à quoi?

[Shadam]

Et bien l'index de colonne est ... l'index de colonne ^^, c'est son numéro quoi... (sur base 0 pour une DGV)

par contre je ne comprends pas ce que tu as rajoutés:
- Pourquoi mettre un "return" dans une sub (tu ne voulais pas mettre "exit" plutôt des fois ?)
- Qu'est ce que c'est que ce "t" qui apparaît de nul part ?

[Crokflo]

Ha OK ... Oui je chercher compliquée pour l'index.
J'ai essayer avec l'index et nn c'est la même chose

Sinon DSL annule le morceau de texte que j'ai taper à l'aveugle il ne sert à rien. Le problème est toujours le même en faite il plante quand il arrive en fin de colonne je voulais l'arréter lorsqu'il arriver à la fin.

[Shadam]

Bon ok alors on va tout remettre à plat là...

1. Tu insères une ligne dans ta DGV
2. Tu mets du texte dans une TextBox
3. Tu clics sur un bouton pour voir si tu trouves la ligne (qui se trouve effectivement là)
4. Si tu la trouves, tu mets du texte ("ça marche") dans ta texBox

Ca va ? J'ai bon jusque là ?

Le problème c'est que tu as un message qui te dit qu'une variable n'est pas instanciée...

Te dit-il laquelle des fois ? (on ne sait jamais hein ?)
Qu'est ce que tu entends EXACTEMENT par

il plante quand il arrive en fin de colonne

[Crokflo]

Tu as tout bon ^^

Je fais du Pas à pas quand je lance le programme (STEP INTO)
le "For Each" marche bien il me parcours toute la colonne ligne par ligne arriver à la ligne où ma valeur choisie en TextBox et trouver il exécute bien le "G reussi", puis il continu à lire les lignes suivantes. Arriver en fin de colonne (dernière ligne) il m'indique l'érreur suivante:

NullReferenceException was unhandled
La référence d'objet n'est pas définie à une instance d'un objet.

Voila ^^
Merci pour ton aide

[Shadam]

Tu as bien mis :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

For Each row As DataGridViewRow In DataGridView1.Rows

et rien d'autre ?

Parce que là ce que t'es en train de me dire c'est qu'il parcours bien toute les lignes mais qu'il ne s'arrête pas à la dernière alors que c'est ce qu'il devrait faire avec le for each

Sinon essaies :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
dim i as integer = 0
For i = 0 to i = DataGridView1.Rows.count -1
            If DataGridView1.Rows.Item(i).Cells.Item("Column1").Value.ToString.Equals(TextBox3.Text) Then
                nom.Text = "G reussi"
            End If
        i += 1
        Next

[chrismonoye]

Bonsoir,
l'erreur énoncée est logique (selon moi).

1) L'index des lignes (colonnes également) débute à 0, alors que le count à 1.

2) Il faut aussi savoir si l'utilisateur est autorisé à ajouter de nouvelles données.
Si oui, une ligne vide apparait en final et ne sera instanciée que lorsque l'utilisateur y entrera des données. Si ce n'est pas le cas, la dernière ligne valide (instanciée) est à l'index -1 et en count à -2.
on peut le savoir par la propriété du DGV : NewRowIndex (égal à -1 si non autorisé).

A tester donc :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
        Dim base As Integer = 0
        If DataGridView1.NewRowIndex = -1 Then
            base = 1
        Else
            base = 2
        End If
        For i As Integer = 0 To DataGridView1.Rows.Count - base
            If DataGridView1.Rows.Item(i).Cells.Item(2).Value.ToString.Equals(TextBox3.Text) Then
                MessageBox.Show("G reussi")
            End If
        Next

[Shadam]

Ah oui je n'y avais pas pensé à la ligne vide parce que je n'autorise quasiment jamais l'utilisateur à ajouter "manuellement" des lignes sur les DGV, je n'ai donc (presque) jamais de lignes vides!!

[dharkan]

si pas tu peux tout simplement faire ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
For i As Integer = 0 To DataGridView1.Rows.Count - base
            If DataGridView1.Rows.Item(i).Cells.Item(2).Value.ToString.Equals(TextBox3.Text) Then
                MessageBox.Show("G reussi")
                Exit For
            End If
        Next

[Shadam]

Edit : petite erreur de lecture de ma part désolé, la solution de Darkhan devrait fonctionner

[Crokflo]

Oui Effectivement la solution de Dharkan fonctionne

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
For i As Integer = 0 To DataGridView1.Rows.Count - base
            If DataGridView1.Rows.Item(i).Cells.Item(2).Value.ToString.Equals(TextBox3.Text) Then
                MessageBox.Show("G reussi")
                Exit For
            End If
        Next

Merci à vous deux pour l'aide