Bonsoir,

voila je vous expose mon probléme :

- 1 timer
- 2 listview ( listview01 et listview02 )
- 2 Textbox ( txtbox01 et txtbox02 )

Ma listview01 contient des chiffres

Lorsque je clique sur un bouton, mes 2 textbox affichent dans un premier temps le premier item de  listview01

A chaque "Tick" de mon timer, j' incrémente de 1 ma textbox02 et txtbox01 l' item suivant de ma listview01

Si txtbox01 est différent de txtbox02, je rajoute l' item manquant dans listview02

Ce que j' ai fait ne fonctionne pas, pourriez vous m' aider svp.

Merci par avance

un petit bout de code serait plus parlant :

Private

Sub TimerCompare_Tick( ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TimerCompare.Tick

Dim Ix As Integer

Dim I As Integer

Ix = ListView_Etiquettes_01.Items.Count - 1

If Txt_Etiquettes_Compare_01.Text = Txt_Etiquettes_Compare_02.Text Then

I = I + 1

Txt_Etiquettes_Compare_01.Text = ListView_Etiquettes_01.Items(I).Text

Txt_Etiquettes_Compare_02.Text = Txt_Etiquettes_Compare_02.Text + 1

End If

If Txt_Etiquettes_Compare_01.Text <> Txt_Etiquettes_Compare_02.Text Then

ListView_Etiquettes_03.Items.Add(Txt_Etiquettes_Compare_02.Text)

End If

If I = Ix Then

TimerCompare.Enabled =

False

End If

End Sub Voila ce que j' ai fait, dans un premier temps cela ne fonctionne pas et ce n' est pas trop optimisé

Fripouil

au fait ça sert à quoi ton code??

A vérifier qu' il ne manque pas des chiffres dans ma listview01 et le cas échéant me les indiquer dans ma listview03


Fripouil

Pour exemple :

Dans listview 1 :                  

1
2
3
4
5
7
8
9

Txtbox01 et txtbox02 affichent 1
Ensuite Txtbox01 affichent le 2éme item de listview1 et txtbox02 on rajoute 1

etc etc jusqu' a 6 : txtbox1 = 7 et txtbox02 = 6

On rajoute dans listview3 : 6

Fripouil

je suis trop fatigué, je vais dormir

Salut Fripouil,
Voici par exemple un code qui devrait faire ce que tu veux, mais sans timer et sans afficher les valeurs dans les TextBox :

Dim Value As Integer = List0(0)
For Each Item As Integer In ListView1.Items
    While Item > Value
       ListView3.Items.Add(Value)
       Value +=1
    End While
    Value +=1
Next

un petit bout de code serait plus parlant :

au fait ça sert à quoi ton code??

je suis trop fatigué, je vais dormir

Très constructif Gillardg

Dim Value As Integer = List0(0)
Dim Value As Integer = ListView1(0)

Merci beaucoup Kevin.Ory de ta participation.

Mais cela ne fonctionne pas, il est vrai que j' ai recopié bêtement ton code en l' adaptant avec mes noms de controles et en bidouillant par ci par là mais rien ne se passe.

Fripouil