checkbox og combobox.

[treeHugger123]

Hei alle sammen.

 

Jeg vet ikke hvordan jeg skal forklare det, men jeg skal prøve.

 

 

La oss si at jeg lager 4 checkboxer

 

1 musikk

2 filmer

3 bilder

4 spill

 

og så ha jeg en combobox.

 

i comboboxen skal det være mange nettsider

------

 

Det jeg vil er at når jeg krysser av på combobox1 ( musikk ) skal alle nettsidene fra comboboxen som ikke har noe med musikk å gjøre forsvinne. ( jeg oraniserere det selv)

Eller gjøre slik at de ikke er mulig å trykke på.

 

og så gjøre det samme med filmer, bilder og spill.

eller hvis jeg krysser av alle 4 skal alle sidene vises i comboboxen.

 

skjønner dere?

[miXer]

Du bruker Checkbox på feil måte. Du bør heller bruke RadioButtons. Checkboxer er ment for å velge flere, mens radiobuttons er ment for å bare kunne velge en blant flere valg.

 

Men det er ikke no verre enn å bruke radiobuttonens CheckedChange event.

Og i den eventen tar du vekk alle items i comboboxen, og legger til bare de du vil ha.

[Haaheim]

Du bruker Checkbox på feil måte. Du bør heller bruke RadioButtons. Checkboxer er ment for å velge flere, mens radiobuttons er ment for å bare kunne velge en blant flere valg.

Nei, hvis jeg har forstått det rett, er det checkbokser han vil ha. Du vil filtrere listevalgene utifra hvilke kategorier som er valgt?

 

Den enkleste måten jeg kommer på nå er å tømme listen hver gang noe skjer og så sjekke gjennom hvilke elementer som skal legges til..

 

Eksempel

Public Sub FillBox() Handles chkMusikk.CheckedChanged, chkFilmer.CheckedChanged, chkBilder.CheckedChanged, chkSpill.CheckedChanged
  cboNettsider.Items.Clear

  If chkMusikk.checked = true then
      cboNettsider.Items.Add("www.xxxx.xxxx")
      cboNettsider.Items.Add("www.xxxx.xxxx")
  End if

  If chkFilmer.checked = true then
      cboNettsider.Items.Add("www.xxxx.xxxx")
      cboNettsider.Items.Add("www.xxxx.xxxx")
  End if

  If chkBilder.checked = true then
      cboNettsider.Items.Add("www.xxxx.xxxx")
      cboNettsider.Items.Add("www.xxxx.xxxx")
  End if

  If chkSpill.checked = true then
      cboNettsider.Items.Add("www.xxxx.xxxx")
      cboNettsider.Items.Add("www.xxxx.xxxx")
  End if
End sub