Var ett tag sen jag programmerade så man har glömt bort en del :)

Jag har nu

<code>
Comboutr.AddItem rs("Utrustning")
Comboutr.ItemData(Comboutr.NewIndex) = rs("idnr")
</code>

så jag får med namn och ett unikt ID nummer.

Men hur får jag fram det idnummer som jag har valt i Combboxen??

Har testat

<code>
Comboutr.ItemData(Index)
</code>

Men den säger 1 hela tiden.

Jag har inte VB6 kvar längre så jag får plocka från minnet, men finns det inte typ Comboutr.SelectedItem.Index?

Edit: Eller är det förresten inte Comboutr.ListIndex man ska använda?


Thomas

hmm nää när jag testade Listindex så sa den bara 1 i alla fall
Den andra går inte

Så här då,

<code>
Option Explicit

Private Sub Form_Load()
Dim i As Integer

'Initera combobox
With Me.Combo1
For i = 65 To 70
'Add new item
.AddItem Chr(i)
'Set itemdata
.ItemData(.NewIndex) = i
Next
End With

End Sub

Private Sub Combo1_Click()
With Me.Combo1
'Hämta data (texten i comboboxen)
Me.dataText.Text = .Text
'Hämta Id (Itemdata)
Me.idText.Text = .ItemData(.ListIndex)
End With
End Sub

</code>

Super
Tackar så mycket

Finns det något liknande i VB.NET. Jag vill loppa ett ds och tildela posterna till olika boxar både namn och id.

/Joakim