vb6.0中怎么把查询到的内容显示到combo中

vb6.0中怎么把查询到的内容显示到combo中
我要从  （员工表） 中  查询 出 （A线）的 人员的 姓名 然后把 姓名 加载到 combo2中去
...
conn.Open connectionString
rs.Open "SELECT 字段 FROM 表", conn
combo1.Clear
While Not rs.EOF
    combo1.AddItem rs!字段
    rs.MoveNext
Wend
rs.Close
conn.Close
... conn.Open ConnectionString
rs.Open "SELECT 姓名 FROM A线表_temp", conn
Combo2.Clear
While Not rs.EOF
   Combo2.AddItem rs!字段
   rs.MoveNext
Wend
rs.Close
conn.Close

第一行报错 说要求对象 易做图，打开数据库连接，取得值，你不会都不懂把？ 真的不懂 刚学习中 那就先学习数据库把 给你的是代码片断，要结合你的具体情况修改。 本帖最后由 bcrun 于 2012-02-29 20:42:00 编辑 终于搞定了

补充：VB ,  基础类