以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于联动三级菜单问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=196152)
--  作者：裴保民
--  发布时间：2025/4/2 20:18:00
--  关于联动三级菜单问题
有三个 ComboBox控件 自定义项目提前设置好了 在e.Form.Controls("tongdaomingchengComboBox") 的SelectedIndexChanged事件中写了如下代码：
Dim cmb As WinForm.ComboBox  =e.Form.Controls("tongdaomingchengComboBox")
Dim tdjc As WinForm.ComboBox  =e.Form.Controls("tongdaojianchengComboBox")
Dim zxt As WinForm.ComboBox  =e.Form.Controls("zixitongComboBox")
If cmb.Value IsNot Nothing Then
    If cmb.Value  = "海科融通" Then
        tdjc.ComboList = "Hkrt"
        tdjc.Value =""
        tdjc.SelectedText = "Hkrt"
        zxt.ComboList = "传统POS|QPOS"
        zxt.Value =""
        zxt.SelectedText = "传统POS"
        tdjc.writevalue
        zxt.writevalue
    ElseIf cmb.Value  = "盒子支付"
        tdjc.ComboList = "Hzzf"
        tdjc.Value =""
        tdjc.SelectedText ="Hzzf"
        zxt.ComboList = "1.0系统|2.0系统"
        zxt.Value =""
        zxt.SelectedText = "1.0系统"
        tdjc.writevalue
        zxt.writevalue
    End If
End If
为什么e.Form.Controls("tongdaomingchengComboBox") 选好项目后e.Form.Controls("tongdaojianchengComboBox")会随着变化，而e.Form.Controls("zixitongComboBox")控件不发变化，必须再选一次才变化呀
--  作者：有点蓝
--  发布时间：2025/4/3 8:38:00
--  
tongdaojianchengComboBox有没有什么事件代码？
--  作者：裴保民
--  发布时间：2025/4/3 15:56:00
--  
没有
--  作者：有点蓝
--  发布时间：2025/4/3 16:14:00
--  
请上传实例测试