Из MDI формы открываю дочернюю форму:
Dim child As New frmObjeRef
child.MdiParent = Me
child.Show()
В frmObjeRef есть два ListBox'a:
lstList и lstRef
При открытии задаю источник данных для lstList:
Private Sub frmObjeRef_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Load
lstRef.DataSource = myDataSet.Tables("NOTE")
lstList.DisplayMember = "Note"
lstList.ValueMember = "NoteID"
End Sub
При изменении lstList задаю источник данных для lstRef:
Private Sub lstList_SelectedValueChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles lstList.SelectedValueChanged
lstRef.DataSource = myDataSet.Tables("REF")
lstRef.ValueMember = "id"
lstRef.DisplayMember = "Name"
myDataSet.Tables("REF").Clear()
' дальше таблица "REF" заполняется данными на основе lstList
If lstRef.Items.Count > 0 Then
lstRef.SetSelected(0, True)
End If
End Sub
При первом открытии frmObjeRef все ОК.
Если потом ее закрыть и открыть, то в lstRef перстают изменяться значения при изменении в lstRef.
Отображается значение из первого сеанса и не меняется.
Похоже, какие-то переменные не обнулились, но что разобраться не могу.
Ответить
|