Jag hade tänkt att presentera lite data från ett recordset i en Listbox.

Jag vill knyta idnummret i tabellen till varje post så att man lätt kan kolla villket id just den posten har i recordsetet.

I ett ex här på pellesoft gjorde man ungefär såhär...

List1.AddItem Recordset("id") & " - " & Recordset("city")

Det funkar ju i och för sig men jag vill inte visa idnummret.
Hoppas ni förstår vad jag menar och kan hjälpa mej

Om det råkar vara så att id fältet är numeriskt är nog ett smidigt sätt att använda ItemData... (Räcker ut tungan till tidigare inlägg)

Dim fldID as Field
Dim fldCity as Field

Set fldID = Recordset("id")
Set fldCity = Recordset("city")

With List1
Do until Recordset.EOF
.AddItem Recordset("city")
.ItemData(.NewIndex) = fldID
Recordset.MoveNext
Loop
End with


Accessar sedan valt id på följande sätt:
If List1.ListIndex = -1 Then
Msgbox "Du har inte markerat en post"
Else
Msgbox "ID: " & List1.ItemData(List1.ListIndex)
End if

Fy på dig Anreas.. du borde skämmas. :D

mvh Frans

Skall kolla vad jag trivs bäst med.
Tackar i alla fall för alla svar.

Hej
Håller med om att min lösning kanske inte var den smartaste

Men ! det var en lösning.

Andreas skrev:
>(Räcker ut tungan till tidigare)

Jag har sett på snuskiga videos att män med avvikande beteende
gör så. Hör du till dem ??

mvh
Sven

Igen
>Do until Recordset.EOF

Ingen bra lösning.Du bör ta reda på hur många poster dett finns
inna du kör loopen, Dvs recCount = rec.RecordCount - 1

For i = 0 To recCount
osv.osv.
Next 'i

tycker sven
igen