Har inte använt combobox något förut, så ja får inte det att funka.
Har följande kod:

Private Sub Form_Load()

cbFalt.AddItem "Peter1"
cbFalt.AddItem "Peter2"
cbFalt.AddItem "Peter3"
End Sub

och

Private Sub cbFalt_Click()

lbl1.Caption = cbFalt

End Sub

Men ja skulle vilja ha det så att istället för ex " Peter1 " , som är det man ser i list rutan och det som komme rupp i lbl1 när man trycker, så skulle det motsvara ett siffer värde.
Så att när man väljer " Peter1 " så skrivs ex värdet 22 ut i lbl1 . 22 är då ett förutbestämt värde som jag betämmer när ja "kodar comboboxen".

/P

Du kan använda ItemData för att spara specifika värden för varje post i combo'n


<code>Private Sub Form_Load()

cbFalt.AddItem "Peter1"
cbFalt.ItemData(cbFalt.Listcount-1)=21
cbFalt.AddItem "Peter2"
cbFalt.ItemData(cbFalt.Listcount-1)=22
cbFalt.AddItem "Peter3"
cbFalt.ItemData(cbFalt.Listcount-1)=23
End Sub</code>

<code>Private Sub cbFalt_Click()

lbl1.Caption = cbFalt.ItemData(cbFalt.listindex)

End Sub</code>

tackar för detta... /P