Bonjour,

J'ai un petit problème avec une petite procédure que j'ai écrite :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
Dim i As Integer = 0
            For Each ligne In CB_NP_NomFrn.Items
                Dim TabNumFrn As Array = Split(CStr(ligne), ",")
                If TabNumFrn(1) = CBSociete.Text Then
                    CB_NP_NomFrn.SelectedIndex = i
                    Exit For
                End If
                i += 1
            Next
Cela me retourne l'erreur option strict sur ( TabNumFrn(1) ) soit la ligne 4.
Que dois-je faire pour l'enlever ? Sachant que ma procédure fonctionne sans l'option stricte.

Merci pour votre attention