Как мне в ListView вывести несколко строк из БД.

обращение к базе
Set dbWorkspace = DBEngine.Workspaces(0)
Set dbDatabase = dbWorkspace.OpenDatabase( _
"D:\test\baza\BAZA.MDB")
Set dbTable = dbDatabase.OpenRecordset("BAZA", dbOpenTable)
If dbTable.BOF And dbTable.EOF Then NewRecord

и в таблице есть вот эти поля
dbTable!m
dbTable!et
dbTable!ep
dbTable!er
dbTable!gt
dbTable!gp
dbTable!gr
dbTable!vt
dbTable!vp
dbTable!vr
dbTable!rez
Зарание благодарен.