vb2005中如何让ComboBox显示某个数据表的一个列?

来源:百度知道 编辑:UC知道 时间:2024/05/18 10:46:17
最好能有一个共用模块,这样最好,因为有很多个ComboBox控件,要显示很多个不同表下的列数据。

写个通用过程,vb2005不熟悉,是不是这样,你试试看
这个只是vb6的代码,
Sub jia(comb As ComboBox, biao As String, ziduan As String)
'数据库连接可以用公用的
'先打开表,把数据添加到comb里
Dim rs As New ADODB.Recordset
rs.Open "select * from " & biao, conn, adOpenStatic, adLockReadOnly

Do While Not rs.EOF
comb.AddItem rs.fields(ziduan)
rs.movenext
Loop
rs.close
End Sub