Помогите начинающему (как заполнить результат запроса sql в текстбох или листбох в vb6?)

Формулировка задачи:

Здравстуйте
Помогите пожалуйста с кодом в vb6 , мне нужно вывести результат запроса sql в текстбох или листбох . все вроде вышло результат выходит в текстбох но только в один столбец а у меня данные идут в несколько столбцов , пробывал использовать dbgrid но ввиду отсутствия у меня большого опыта никак не выходит, вот пример кода:

Command1_Click()

 con  ADODB.Connection
 rez  ADODB.Recordset
 Str

Str = 
 con =  ADODB.Connection
con.ConnectionString = Str
con.
 rez =  ADODB.Recordset

 rez = con.Execute()
   rez.EOF
List1.AddItem rez.Fields()
List1.AddItem rez.Fields()
rez.MoveNext

rez.
con.

 

С уважением Дамир

Решение задачи: «Помогите начинающему (как заполнить результат запроса sql в текстбох или листбох в vb6?)»

textual
                            Листинг программы 
                        
                            rs.<font color="blue">Open</font> <font color="teal">"select ..."</font>, , adOpenStatic, adLockReadOnly, adCmdText