Listbox/Datalist Dataformat

[mickallen]

I'am populating a Listbox and Datalist with prices from an Access database.
My problem is that I cannot get the prices to display in the currency format.
I have set the DataFormat Property to Currency but this has no affect.
I have populated the Listbox using a data control and with code just to check to see one way would work better than the other, but I can't display the currency correctly no matter which way I try.

Here is the code I used.

Do While Not Records.EOF
Price.AddItem Records("Price&quot
Price.ItemData(In_Stock.NewIndex) = Records("Stock_Code&quot
Records.MoveNext
Loop

Can any one help!!!

 

[MarkSweetland]

Try formatting prior to adding to the list:

    Price.AddItem format(Records("Price"), "currency")

Mark

 

[mickallen]

Thanks Mark that has solved the problem.