如何实现在combo中添加数据库数据的类

[aabbcc_dd]

请教各位大侠!
如何实现在combo中添加数据库数据的类
1.我想把数据库中其中一个表的一个数据项的列都加入到COMBO控件中
2.因为有很多地方要重复用到问题1,所以想用类实现,但不知道如何去做.

在此先谢谢各位的帮助和捧场!!

[bbhere]

rs.open "select name from table",conn, adOpenStatic, adLockReadOnly
Do Until rs.EOF
combo1.AddItem rs!name
rs.MoveNext
Loop
rs.Close
set rs = nothing

[bbhere]

把记录集打开字符串定义成公共变量就可以了

[aabbcc_dd]

请教大侠要是封装成类怎么弄呀?小弟在此谢谢了~