Что сразу же бросилось в глаза дак это что у вас все завязано на элементах управления, я бы избавлялся бы от использования SelectionChangeCommitted и подобных конструкций:
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
Private Sub cbProdavl_SelectionChangeCommitted(ByVal sender As Object, ByVal e As System.EventArgs) Handles cbProdavl.SelectionChangeCommitted
Dim vuePr As DataView
vuePr = dsNewSD.Tables("KontrProd").DefaultView
vuePr.Sort = "idkontr"
Dim intIndexPr As Integer = vuePr.Find(Me.cbProdavl.SelectedValue)
If vuePr(intIndexPr)("uvbal") = - 1 Then
cbProdVNB.Checked = True
Else
cbProdVNB.Checked = False
End If
If vuePr(intIndexPr)("bal") = - 1 Then
cbProdB.Checked = True
Else
cbProdB.Checked = False
End If
End Sub
Это как раз и приводит к непредсказуемым вариантом (хотя все исправляется но ИМХО путь не правильный). Так при выборе значений из ComboBox срабатывает много событий, и чтобы понять что происходит прогоните свой код в пошаговом режиме. Поймете что полная каша.
Предлагаю вам сделать форму при помощи DataWizard в VS.NET и посмотрить как там организована работа с данными,как используется событие
PositionChanged.
Это событие и следует использовать.
Если что не понятно спрашивайте.
