读书人

数据库与combo控件的有关问题

发布时间: 2012-01-14 20:02:35 作者: rapoo

数据库与combo控件的问题
现在要做一个旅游查询系统,现在有两个combo控件,均分别与数据库相连,第一个连接城市项,第二个连接景点项,想要实现在第一个combo里选择一个城市名后第二个combo里的下拉菜单只显示出第一个combo城市里对应的景点……小弟新来,分数不多,还忘各位大虾不吝赐教。

[解决办法]
Private Sub Combo1_Click()
Combo2.Clear
hhhh = "select 景点名称 from 旅游 where 所在城市= ' " & Combo1.Text & " ' "
Data1.RecordSource = hhhh
Data1.Refresh
Do Until Data1.Recordset.EOF
Combo2.Text = Data1.Recordset.Fields( "景点名称 ")
If Not Data1.Recordset.EOF Then
Combo2.AddItem Data1.Recordset.Fields( "景点名称 ")
Data1.Recordset.MoveNext
End If
Loop
End Sub

读书人网 >VB

热点推荐