la conversion de type "DBNull" en type "Boolean" n'est pas valide

Version imprimable

Bonjour,
j'ai un datagridview avec un colonne de chekbox quand je selectionne il me calcule la ligne voici mon code

Code:

1
2
3
4
5
6
  Dim total As Double = 0
            For i As Integer = 0 To Me.DataGridView1.Rows.Count - 2
                If CBool(Me.DataGridView1.Rows(i).Cells("DET_BL_LIVR").Value) = True Then
                    total = total + Val(Me.DataGridView1.Rows(i).Cells("DET_BL_MONT").Value)
                    Me.TXT_TOTALHT.Text = Math.Round(total, 2)
                End If

voici l'erreur:

Citation:

La conversion de type "DBNull" en type "Boolean" n'est pas valide

Merci d'avance

02/11/2010, 11h12
sebnantes

Salut,

Es-tu sûr qu'il y a bien une valeur dans ce que tu veux convertir en booléen ? Ne te trompes-tu pas de colonnes ?
02/11/2010, 11h43
najoua01

salut,
non dans le colonne "DET_BL_LIVR" il ya un selectionne chekbox
bon quand je selectionne la case "DET_BL_LIVR" il me calcule le total de colonne "DET_BL_MONT"

Merci
02/11/2010, 11h48
calagan99

Sebnantes a raison. Ton erreur est assez claire : la valeur de ta cellule est nulle.
Avant de la caster, teste d'abord son contenu et assure toi qu'il n'est pas nulle avant de la transtyper.
02/11/2010, 12h00
sebnantes

Je soupçonne aussi que ta checkbox, pour chaque ligne, n'est pas initialisée correctement. Ce qui fait que tu as une valeur Null qui est retournée. Petite question : La première de ton datagridview, la checkbox est cochée ou pas ?
02/11/2010, 13h04
najoua01

Re Bonjour,
il est pas null mais il ya des 0 donc il faut le calculer
Merci
02/11/2010, 13h17
sebnantes

Je ne comprend pas ton image, c'est la 4ème ligne qui pose problème ou la 1ère ?
02/11/2010, 13h24
najoua01

non le problème dans la case de total HT qui fait la somme de ligne selectionne
02/11/2010, 13h41
sebnantes

Et quand toutes tes checkbox sont cochées, as-tu une erreur ?
02/11/2010, 13h48
najoua01

non quand je décoche il me donne cette erreur

Dans ce cas, fais un truc dans le genre :

Code:

1
2
3
4
5
6
7
8
Dim total As Double = 0
    For i As Integer = 0 To Me.DataGridView1.Rows.Count - 2
        If Not IsDbNull(Me.DataGriView1.Rows.Cells("DET_BL_LIVR").Value) then
            If CBool(Me.DataGridView1.Rows(i).Cells("DET_BL_LIVR").Value) = True Then
                total = total + Val(Me.DataGridView1.Rows(i).Cells("DET_BL_MONT").Value)
                Me.TXT_TOTALHT.Text = Math.Round(total, 2)
            End If
        End If

02/11/2010, 14h13
najoua01

Merci bouceaup sebnantes
ça marche très bien maintenant je prend ou est l'erreur vraiment je suis bête:roll:
Merci encore
02/11/2010, 14h17
sebnantes

N'oublie pas de mettre "Résolu" en bas du sujet ^^
02/11/2010, 16h03
najoua01

merci sebnantes
merci à tous