Суммирование значений из ListBox

sh_ramil Пользователь Сообщений: 15 Регистрация: 23.04.2015	#1 24.04.2015 18:07:25 Здравствуйте, подскажите, пожалуйста! Как правильно получить сумму чисел столбца 2 из ListBox и вставить в TextBox при нажатии кнопки. Заранее спасибо!

Пользователь

Сообщений: 8839 Регистрация: 11.01.2013

24.04.2015 18:48:22

Код
Private Sub CommandButton1_Click() Dim i&, s# With ListBox1 For i = 0 To .ListCount - 1 s = s + .List(i, 1) Next End With TextBox1 = s End Sub

sh_ramil Пользователь Сообщений: 15 Регистрация: 23.04.2015	#3 24.04.2015 19:55:56 Спасибо, все работает!