Debes hacer la suma referenciando a los elementos del listbox.
Código vb.net:
Ver originalDim total As Double = 0
For i As Int32 = 0 To Me.ListBox1.Items.Count - 1
total = total + Convert.ToDouble(Me.ListBox1.Items.Item(i))
Next
moneytxt.Text = Convert.ToString(total)
Saludos.