MS Access中ComboBox联动子窗体SourceObject的Select Case代码异常问题求助
MS Access中ComboBox联动子窗体SourceObject的Select Case代码异常问题求助
各位大佬好,我现在在MS Access里遇到了一个VBA代码的问题,想请大家帮忙排查下。
我做了一个ComboBox(控件名Combo0),绑定了AfterUpdate事件,下拉选项是BHP、PPOŻ、ISO三个值。需求很明确:选择不同的选项时,让子窗体(Child3)的SourceObject切换成对应的子窗体对象——选BHP对应subfrmBHP,选PPOŻ对应subfrmPPOZ,选ISO对应subfrmISO。
但实际运行的时候完全乱了:选BHP反而显示PPOŻ的子窗体,选PPOŻ显示BHP的,选ISO还是显示BHP的。我已经重新建过表、主窗体和子窗体了,有人说可能是子窗体的数据绑定问题,但我检查过子窗体的绑定设置是空的,没发现问题。
我的VBA代码如下:
Private Sub Combo0_AfterUpdate() Select Case ChangeCombo Case Combo0 = "BHP" Forms("frmInstrukcje").Form.Child3.SourceObject = "subfrmBHP" Case Combo0 = "PPOŻ" Forms("frmInstrukcje").Form.Child3.SourceObject = "subfrmPPOZ" Case Combo0 = "ISO" Forms("frmInstrukcje").Form.Child3.SourceObject = "subfrmISO" End Select End Sub
有没有大佬能帮我找出哪里错了?感谢!
备注:内容来源于stack exchange,提问作者Vokun
相关产品推荐
相关产品推荐

