[RESOLVED] cannot DISTINCT 1 field And 2 Fields at the same time why?

[salsa31]

hey
i am trying to Distinct and load 1 field to the listview and another one as regular but it is not working why?
what i am missing ?
this is my code

Select DISTINCT PriceName

Dim RsQ As New ADODB.Recordset
        
RsQ.Open "Select DISTINCT PriceName,PriceCost From PriceList order by PriceName", CN
        Do While Not RsQ.EOF
        Set itm = FrmTipulimToGeneralSale.LTreat.ListItems.Add(, , RsQ!PriceName, 1)
            itm.SubItems(1) = FormatCurrency(RsQ!PriceCost)
        RsQ.MoveNext
        Loop
 RsQ.Close

tnx for any help
salsa31