Errore nella visualizzazione dei dati[VB6].

[Mychy]

Forse non è soddisfatta questa istruzione:

If rec.Fields(0).Value = lstmagazzino.ListIndex + 1 Then