新人问题,求大大门回答下!!!!
Microsoft       Activex       Data       Objects       2.x       Library          
    'access      
    Dim       objcon       As       New       ADODB.Connection      
    Dim       objrs       As       New       ADODB.Recordset      
    objcon.Open       "Provider=Microsoft.Jet.OLEDB.4.0;Data       Source=ip地址+数据库路径+数据库名 "       '如：192.168.0.1\c:\data.mdb      
    objrs.Open       "select       *       from       infoTable       ",       objcon,       3,       1      
    while       not       objrs.eof      
    list1.additem       objrs.fields(0)  
    objrs.movenext    
    wend
其中:
objrs.Open       "select       *       from       infoTable       ",       objcon,       3,       1      
    while       not       objrs.eof      
    list1.additem       objrs.fields(0)  
    objrs.movenext    
    wend
着段是什么意思..在这里起到什么作用..偶新人看不懂

------解决方案--------------------

'objrs是定义的ADO对象：记录集，调用Open方法，从表infoTable中查询数据
objrs.Open "select * from infoTable ", objcon, 3, 1

'如果记录集中有数据，开始循环每一行的数据
While Not objrs.EOF
'把当前行的第一个字段的值加到列表框的数据源中
list1.additem objrs.Fields(0)

'移动到下一行记录
objrs.MoveNext
Wend