Visual Basic - list

hola que tal tengo un formulario en el cual tengo el control de productos clave, producto, descripcion, cantidad etc este esta bajo una base de acces con un data
agregue un list y quiero que todos los datos de la base se muestren en este lis por columnas
tengo este codigo

Data1.Recordset.MoveFirst
While Data1.Recordset.EOF = False
List1.AddItem Text1.Text
Data1.Recordset.MoveNext
Wend

pero solamente se muestra solamente la clave
me gustaria que aperecieran todos los elementos juntos pero por columnas

clave producto descripcion cantidad etc

Bueno a menos de que lo quieras separar con pipes, comas u otro caracter p. ej.

List1.AddItem Data1.fields(0) & "|" & Data1.fields(1) & °!" & Data1.fields(2) ....

creo que como es un List y no un Combo podrías utilizar un Grid y tener separados los campos para una mejor lectura.