Visual Basic - Solo Marcas

tengo dos List ( List1 y List2 ) en List1 la lleno con Productos y List2 la quiero para que al hacer click en List1 llene List2 con todas las marcas que coinsidan con ese producto seleccionado. todos los datos estan en una misma tabla.. alguien me podria ayudar ?

en el evento click del listbox podrias poner esto:
Set Rs=New Recordset
Rs.CursorLocation=AdUserClient
Rs.Open "Select * From Marcas where Producto=' " & Trim(List1.Text) & " ' "
If Rs.Eof then
Do While Not Rs.Eof
List2.AddItem Rs.Fields(0)
Loop
End If
Set Rs=Nothing
Espero te sirva suerte