You need to enable JavaScript to run this app.
优惠活动
大模型
产品
解决方案
定价
更多

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

相关产品推荐
方舟 Agent Plan

超全模态模型 × Harness 升级,最新支持 Deepseek-V4.1-Flash、GLM-5.3 系列、Doubao-Seedream-5.0-pro、Kimi-K3 (部分), 限时 9.9 元起

最近更新时间:2026.04.23 14:03:15