ListBox et somme?????

Question

salut tous

 jai un petit question,simplement comment on peut faire la somme des plusieur nombres dans une

 liste (ListBox) et afficher la somme dans une zone de texte(TextBox) tous ça apres une click sur

le button(Button),
 
NB:jai essaye les soulutions de VB6 mais ca marche pas
 
Merci davance

Answer 1

Par exemple

 

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

For cmpt As Integer = 1 To 10

Me.ListBox1.Items.Add(cmpt)

Next

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim Somme As Integer

For Each Elem As Object In Me.ListBox1.SelectedItems

Somme += CInt(Elem)

Next

Me.TextBox1.Text = Somme.ToString

End Sub

Answer 2

Merci pour votre aide,mais ce code la ca marche pas,le resultat des nombres est zero!!!!!!

Answer 3

il faut sélectionner les éléments dans la liste :-)