求一实例 关于实现两个combox之间的联动.

求一实例 关于实现两个combox之间的联动.
现有combox1 combox2 
在combox1 选“广东” combox2里面要显示“广州”、“深圳”、“珠海”等...  
在combox1 选“广西” combox2里面要显示“桂林”、“南宁”等....
请问如何实现？

VB code

Option Explicit



Private Sub Combo1_Click()
Select Case Combo1.Text
Case "A"
Combo2.ListIndex = 0
Case "B"
Combo2.ListIndex = 1
Case "C"
Combo2.ListIndex = 2
End Select

End Sub

Private Sub Form_Load()
Combo1.AddItem "A"
Combo1.AddItem "B"
Combo1.AddItem "C"

Combo2.AddItem "1"
Combo2.AddItem "2"
Combo2.AddItem "3"
End Sub

VB code

Option Explicit

Private Sub Combo1_Click()
Select Case Combo1.Text
Case "广东"
Combo2.Clear  '清空
Combo2.AddItem "深圳"
Combo2.AddItem "广州"
Combo2.AddItem "......"
Combo2.ListIndex = 0 '选第0项
Case "广西"
Combo2.Clear
Combo2.AddItem "南宁"
Combo2.AddItem "桂林"
Combo2.AddItem "XX"
Combo2.ListIndex = 0
End Select

End Sub

Private Sub Form_Load()
Combo1.AddItem "广东"
Combo1.AddItem "广西"
End Sub

创建一个Access数据库，其中创建一个表格，表格内包含字段：FD_Sheng、FD_ChengShi
每个城市一条记录，比如；广东就可以有：
广东 广州
广东 深圳
广东 湛江
.
.
.
在数据库创建好后，查询数据库，用查询的来的FD_Sheng记录填写Combo1，形成查询条件。当你选择Combo1中的省份时，就依据这个为查询条件查询数据库，并将查询的来的FD_ChengShi记录填写Combo2即可。