Estoy intentando seleccionar varios items y que me carge respectivas listas y si deselecciono uno que me refresque y carge el que esta seleccionado
Gracias
Private Sub CheckedListBox1_MouseClick(sender As Object, e As MouseEventArgs) Handles CheckedListBox1.MouseClick
If CheckedListBox1.GetItemChecked(0) Then
For N_lupulo = 0 To Receta_Nueva.Dgv_Tabla_Lupulos.RowCount - 1
If CheckedListBox1.Items.Item(0).ToString = "Lupulos" Then
CheckedListBox2.Items.Add(Receta_Nueva.Dgv_Tabla_Lupulos.Rows(N_lupulo).Cells(1).Value)
End If
Next
For N_fermentable = 0 To Receta_Nueva.DGV_Tabla_Fermentables.RowCount - 1
If CheckedListBox1.Items.Item(1).ToString = "Maltas" Then
CheckedListBox2.Items.Add(Receta_Nueva.DGV_Tabla_Fermentables.Rows(N_fermentable).Cells(1).Value)
End If
Next
Else
CheckedListBox2.Items.Clear()
End If