Foxtable(狐表)用户栏目专家坐堂 → 关于联动三级菜单问题


  共有50人关注过本帖树形打印复制链接

主题:关于联动三级菜单问题

帅哥哟,离线,有人找我吗?
裴保民
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2116 积分:13596 威望:0 精华:0 注册:2017/4/3 15:01:00
关于联动三级菜单问题  发帖心情 Post By: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")控件不发变化,必须再选一次才变化呀

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:113213 积分:576494 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/4/3 8:38:00 [只看该作者]

tongdaojianchengComboBox有没有什么事件代码?

 回到顶部
帅哥哟,离线,有人找我吗?
裴保民
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:九尾狐 帖子:2116 积分:13596 威望:0 精华:0 注册:2017/4/3 15:01:00
  发帖心情 Post By:2025/4/3 15:56:00 [只看该作者]

没有

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:113213 积分:576494 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2025/4/3 16:14:00 [只看该作者]

请上传实例测试

 回到顶部