Справка по VB 2008 или VB 2010

Question

У меня есть три формы, похожие на одну в ссылке. Я хочу добавить текстовое поле Total для каждой формы. К сумме будут добавлены значения, которые будут введены в текстовое поле montant. Таким образом, итоговое значение будет принимать конкретное значение этого текстового поля для всех записей, которые будет иметь пользователь, и добавлять их. Как я могу это сделать ???? Спасибо http://i1006.photobucket.com/albums/af189/diaboloent/OneForm.jpg

Answer 1

Поместите все текстовые поля, где пользователь будет вводить значение в общий контейнер, такой как групповой ящик или панель управления.Затем используйте код, подобный следующему, для суммирования значений:

Dim sum As Integer = 0
For Each box As TextBox In MyContainer.Controls.OfType(Of TextBox)()
    sum += Integer.Parse(box.Text)
Next box
Total.Text = sum.ToString()

Вы даже можете получить это до одной строки:

Total.Text = MyContainer.Controls.OfType(Of TextBox)().Select(Function(s) Integer.Parse(s.Text)).Sum()