Filter single column in a recordset

I created a recordset in Visual Basic 6.0 consisting of 2 columns. How to clone this recordset so that the cloned recordset consists of a single column only having distinct record(s)?

eg: Original Recordset has 2 columns(fields) as:

Item WareHouseCode
—- ————-
CMT WHS1
CMT WHS2
PKG WHS1
PKG WHS2

The resultant recordset should give me only one colummn with distinct values. As in this case
Cloned Recordset:

Item
—-
CMT
PKG