如何實作選擇combox1控制元件中的吉林省份時，combox2 控制元件中顯示出吉林省份中的城市？
uj5u.com熱心網友回復：
combox是可以系結adodc的，省份發生變化時，修改adodc的查詢陳述句并重繪就可以了uj5u.com熱心網友回復：
可以說的具體點嗎uj5u.com熱心網友回復：
其實不必將各省分開串列。在同一表中增加省欄位即可。首先在 Form_Load 事件中，填寫 ComboBox1：
rs.Open "SELECT DISTINCT 省份 FROM yourtable"
Combo1.Clear
Do Until rs.EOF
Combo1.AddItem rs!省份
rs.MoveNext
Loop
rs.Close
If Combo1.ListCount Then Combo1.ListIndex = 0
在 Combo1 的 Click 事件中：
rs.Open "SELECT 城市 FROM yourtable WHERE 省份='" & Combo1.List(Combo1.ListIndex) & "'"
Combo2.Clear
Do Until rs.EOF
Combo2.AddItem rs!城市
rs.MoveNext
Loop
rs.Close
If Combo2.ListCount Then Combo2.ListIndex = 0
uj5u.com熱心網友回復：
當然，也有用分表的。那一般是大資料量的應用，詳表中許多欄位用編碼，一些上層表實際上存盤的是編碼對應關系。例如：
北京 01
黑龍江 02
吉林 03
遼寧 04
……
uj5u.com熱心網友回復：
使用 ADODC，變更查詢 SQL 的方法有兩種：1 直接改 RecordSource 屬性：
ADODC1.RecordSource = "SELECT 城市 FROM yourtable WHERE 省份='" & Combo1.List(Combo1.ListIndex) & "'"
ADODC1.Refresh
2 掛接新的 rs 物件
Set ADODC1.RecordSource = rs
ADODC1.Refresh
uj5u.com熱心網友回復：
1、將資料寫入combox12、滑鼠選擇combox1 ，根據選擇的資料，作為查詢條件，查資料庫
3、將查出的結果，寫入combox2，
這樣，就實作了。
uj5u.com熱心網友回復：
Private Sub Form_Load()
Combo1.Clear
Adodc1.ConnectionString = "" '連接資料庫的字串，你自己添加
Adodc1.RecordSource = "Select * From 省份"
Adodc1.Refresh
Do While Not Adodc1.Recordset.EOF
Combo1.AddItem Adodc1.Recordset.Fields("省份名稱") '不知道你的省份資料表的欄位結構，只能這樣
Adodc1.Recordset.MoveNext
Loop
End Sub
Private Sub Combo1_Click()
Combo2.Clear
'連接資料庫，在 Form_Load 已經加載，這里不需要再次加載
Adodc1.RecordSource = "Select * From " & Combo1.Text & ""
Adodc1.Refresh
Do While Not Adodc1.Recordset.EOF
Combo2.AddItem Adodc1.Recordset.Fields("城市")
Adodc1.Recordset.MoveNext
Loop
End Sub
你這樣設定資料表，我認為不合理，將各省的表，合并為一個表，增加省份的欄位就可以。
uj5u.com熱心網友回復：
二列，名稱，上級名稱，即可。根據上級名稱，就可以搜索出他所有的下級，支持N層。
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/73801.html
標籤：控件