首页 > 代码库 > datacombo必须绑定到控件吗

datacombo必须绑定到控件吗

想让datacombo控件显示数据库中表的一列,必须要先添加adodc控件吗?直接用代码赋值datacombo的属性不行吗?
 
可以通过自定义一个数据源,不使用控件也是可以的,不过方法比较麻烦,需要你对数据源的概念有一定理解。

下面是一段参考代码

Private Sub Form_Load()
Dim Conn As ADODB.Connection ‘定义一个数据链接对象
Dim Rs As ADODB.Recordset ‘定义一个记录集对象,用于保存数据源
Set Conn = CreateObject("ADODB.Connection") ‘这两行是用于创建对象使用的
Set Rs = CreateObject("ADODB.Recordset")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=D:\My Documents\mydata.mdb" ‘打开一个链接,这里D:\My Documents\mydata.mdb是数据库的路径,你需要根据自己实际的情况修改这个字符串
Rs.Open "select * from stars", Conn, 1, 3 ‘数据链接成功以后,需要选择数据,这里是一个SQL语句,,通过这个命令,可以从数据库中选取自己希望得到的数据
Set DataCombo1.DataSource = Rs.DataSource ‘将获得的记录集的数据源,并链接到datacombo1上
DataCombo1.DataField = "str1" ‘设置自己希望得到的字段

‘通过上面的设定,可以不使用控件就绑定数据源,不过因为没有控件,所以操作会变得很复杂
End Sub

datacombo必须绑定到控件吗