[Débutant] probleme d'ajout des lignes

[B]bonjour

j'ai un message d'erreur lorsque je tente d'ajouter une ligne.voila le code du bouton (ajouter)

Code:

1
2
3
4
5
6
7
8
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Try
            Me.STOCKBindingSource.AddNew()
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
 
    End Sub

:arf::arf:
et voila l'erreur que j'ai :
Pièce jointe 124505
sachant que je crois que le problème vient du code que j'ai met pour colorier des cellules :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub STOCKDataGridView_CellPainting(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellPaintingEventArgs) Handles STOCKDataGridView.CellPainting
        Dim ligne As Integer 'Variables de position de cellule
        ' Dim colonne As Integer = 6
        'Parcourir le STOCKDataGridView
        Try
            For ligne = 0 To STOCKDataGridView.RowCount - 1
                ' colonne = STOCKDataGridView.ColumnCount - 1
                '       'Si la valeur de la cellule(5,ligne) < cellule(6,ligne) alors
                If STOCKDataGridView.Item(5, ligne).Value < STOCKDataGridView.Item(6, ligne).Value Then
                    'Colorer la cellule(ligne,6)
                    STOCKDataGridView.Rows(ligne).Cells(5).Style.BackColor = Color.OrangeRed
                End If
            Next
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try
 
    End Sub

SVP j'ai vraiment besoin de vos aides
[B]:ccool: