Iterazioni tra i controlli della form:
codice:
Dim CBox As ComboBox
Dim ChBox As CheckBox
Dim TBox As TextBox
Dim Somma As Double = 0
Dim Valore As Double = 0

For Each C As Control In Me.Controls
  Valore = 0
  If TypeOf C Is ComboBox
    CBox = C
    If CBox.SelectedIndex >= 0 Then
      Valore = CBox.SelectedItem
    End If
  ElseIf TypeOf C Is CheckBox
    ChBox = C
    If ChBox.Checked Then
      Valore = ChBox.Tag
    End If
  ElseIf TypeOf C Is TextBox
    TBox = C
    If TBox.Text <> Nothing Then
      Valore = TBox.Text
    End If
  End If
  Somma += Valore
Next
E' necessario che tutti i controlli siano nel Main Form. Se ci sono controlli racchiusi in GroupBox dovrai fare dei controlli anche su quelli: basta che crei una funzione che restituisce la somma dei controlli in un contenitore, partendo da questo stereotipo.