vb6中的多级组合框

Multilevel Combo box in vb6

我正在尝试在 vb6 中创建一个类似于附图中所示的多级组合框。此框将用于 select 值,然后将其保存到访问数据库(欢迎对我将如何设计数据库的这方面的任何见解)一个。我一直在寻找一种方法来做到这一点,但到目前为止我还没有找到任何方法。任何帮助,将不胜感激。

这看起来像是绑定到 ComboBox 单击事件的 Popup menu

This link 演示如何以编程方式创建弹出菜单

如果您使用的是 VB6,只需按 CTR+E,然后按照 these instructions

配置弹出菜单后,您剩下要做的就是:

Private Sub ComboBox1_Click()
    Call popupMenu.ShowPopupMenu
End Sub

并确保所有菜单功能设置 Text 属性 的 ComboBox1