我错在哪？

Ajoe

我想实现从一个组合框中选择了数据，在另一个组合框中就会出现相应的数据。
但是我出了一点小问题，请帮我看看代码：
Private Sub Combo2_GotFocus()
    Me.Combo2.RowSource = "SELECT 条例ID, 违反条例 FROM tab违反条例 WHERE (类型ID = Me.Combo0)"
End Sub

运行后，会弹出个窗口，让我再输入Combo0的数据。
说明：Combo0是第一个组合框，Combo2是第二个组合框。
如果看不明白，我再传个文件。

yangzn

应该为: 如类型ID为数值
Me.Combo2.RowSource = "SELECT 条例ID, 违反条例 FROM tab违反条例 WHERE (类型ID =" & Me.Combo0 ")"
如类型ID为文本
Me.Combo2.RowSource = "SELECT 条例ID, 违反条例 FROM tab违反条例 WHERE (类型ID ='" & Me.Combo0 & "')"

Ajoe

谢谢，对了，我的是文本型的。我开始也试过
'" & Me.Combo0 & "'
但是我把前面（左边）的那个'和"位置搞反了，写成"' & Me.Combo0 & "'，所以出现错误提示，但我没发现原因，刚看了你的代码才醒悟，呵呵！我真笨。