窗体上放了两个DataCombo控件 - VB6论坛

问题点数：0 回复次数：0

窗体上放了两个DataCombo控件

想其中一个改变时另一个根据数据库内容也跟着改变，但运行时无效果，也不报错

Dim rs As New ADODB.Recordset

程序代码：

Private Sub DataCombo2_Change()
rs.Open "select * from [DMZD_Team] where [Department]= '" & DataCombo2.BoundText & "'", adoCon
Set DataCombo3.RowSource = rs
DataCombo3.ListField = "TeamCode"
rs.Close
End Sub

[此贴子已经被作者于2016-12-19 20:05编辑过]

搜索更多相关主题的帖子: 数据库　