Question

vb combo与数据库文件关联

如题。小弟做了一个类似同学录的软件

想建一个combo，目的是显示access数据库中的姓名。这样可以一目了然的看到所有的名字。

应该是Combo1.DataSource = ？？

还是什么的。。。

有点儿搞不懂，望高手援助。
建立一个datacombo控件然后该怎么做呢？
cwa9958 麻烦详细说一下好么？

Answer 1

用的是VB.NET吗？代码如下：

ComBo.DataSource = DataTable.Tables("TableName")
ComBo.DisplayMember = "DisplayField"
ComBo.ValueMember = "ValueField"

什么年代，别再用VB6了。

既然楼主和cwa9958都热心于VB6，用datacombo，那就用ADO举例如下吧：

dim conn as adodb.connection
conn.open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source = '" & App.Path & "\xxx.mdb'"

dim rst as adodb.recordset
rst.open "select * from names",conn,1,3

DataCombo1.RowSource = names
datacombo1.ListField = "name_field"

在工具栏加入Datacombo的方法是点击“工程”-“部件”-“Microsoft Data List Controls 6.0”

本人级别低，请楼主给点分吧。

Answer 2

不可以这样做，只能一条条添加进combo1里面。或者用别的控件，如datacombo控件

不同意Taylor1973 的观点，vb6也有优点，用net做的程序不能再xp系统简单运行的，还要先安装net运行库，麻烦

Answer 3

你会用adodc控件不？
这个是vb6.0最好用的一个控件~
你把条件著名好~
例如：
xxWs = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\（access名）.mdb;Persist Security Info=False;Jet OLEDB:Database Password=密码"
Adodc1.ConnectionString = xxWs
Adodc1.RecordSource = "select * from 表名"
Adodc1.Refresh
Combo1.DataSource = adodc1.Recordset

Answer 4

不可以吧。不是察觉控件。