本人正在学习中 有很多不懂的地方希望高手赐教

用VB引用ADO控件达到连接数据库的目的 并提取数据到combo


我记得学的是
Private Sub Form_Load（）

DIM CN AS XXXXX
DIM RS AS XXXXX

SET CN AS XXXXX
SET RS AS XXXXX

End Sub
然后记得是啥.ADDITEM 但是后面不会写 应该是有个括号 里面是数字 代表SQL里的列（X，X，X）

具体怎么写忘了 大概结构还记得


请大家帮帮忙啊

补充下 有要求（不是我自己定的） 必须这个格式 呵呵

谢谢大家啦

另外如何通过主键 外键 过滤信息？ 还有 相关图片 是录入SQL还是VB 图片也是分类的 很多种 跟之前那个过滤信息有关


大概的示意图

 A   B   C   D
001 AAA VVV PIC
002 SSS NNN PIC
003 DDD MMM PIC
001 BBB UUU PIC
002 WWW YYY PIC
003 QQQ TTT PIC



完成效果应该是 通过COMBO 查询A 过滤信息B 然后 查询B 过滤信息C 并显示图片


麻烦大家了  大概好像是这个意思 第一次写程序 迷迷糊糊的

rs.open "select A,B from table",cn,adOpenKeySet
    if rs.recordcount > 0
        rs.movefirst
        do while not rs.EOF
            CombBoxA.AddItem rs.Fields(0)
            CombBoxB.AddItem rs.Fields(1)
            rs.movenext
        loop
    end if
rs.close

在 set cn as xxxxx 和 set rs as xxxx的as后面必须加上new关键字

DIM CN AS XXXXX
DIM RS AS XXXXX

SET CN=XXXXX
SET RS=XXXXX


这里的DIM XXX应该写啥？ recordset 还是database 怎么写  
set cn= XXX  写什么
就这里不明白

dim cn as new adodb.connection
dim rs as new adodb.recordset
就可以了，不用set语句