Question

如何使用VB中的COMBOX控件

我想用COMBOX来设定几个数值，这几个数值的源是来自SQL,然后用datagrid来显示，datagrid是链接SQL数据库的。当commo1选择了其中一个AddItem时，datagrid就显示相对应的数据。现在问题是，这个可以怎样做，我思考了很久，没摸索出来...大家交流下吧

Answer 1

假设程序运行后单击combo1里的名字，datagrid对应显示记录代码如下：Private Sub Form_Load()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\VB\1-数据库相关\adodc\01.mdb;Persist Security Info=False"
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "select * from 成绩单"
Set DataGrid1.DataSource = Adodc1
Set Combo1.DataSource = Adodc1
For i = 1 To Adodc1.Recordset.RecordCount
Combo1.AddItem Adodc1.Recordset("姓名").Value
Adodc1.Recordset.MoveNext
Next i
End Sub Private Sub Combo1_click()
Adodc1.RecordSource = "select * from 成绩单 where 姓名='" & Combo1.Text & "'"
Adodc1.Refresh
End Sub 把我代码中的路径和字段名改成你的即可