Bonjour à tous,

Je ne comprend pas l'erreur.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
With MainForm.CZ_datagrid
 
i = 0
            While .Item(i + 24, 2).Value <> 0 'erreur ici
                i = i + 1
                ReDim Preserve FrontRideHeightCZ(i)
                FrontRideHeightCZ(i) = .Item(i + 23, 2).Value 'erreur ici
            End While
Error 1 Option Strict On disallows operands of type Object for operator '<>'. Use the 'Is' operator to test for object identity.