我有 3 个组合框,第一个包含主题,第二个组合框具有初学者-高级级别,然后第三个组合框包含培训师名称。第二个和第三个组合框列表应根据在第一个组合框中选择的条目而有所不同。我有一个“信息”工作表,其中有 2 个表,我应该在其中引用列表,两个表都有主题作为标题,每个主题列都列出了每个级别(在第一个表上)和培训师(在第二个表上)说的题目。我已经命名了表格(级别和培训师)以供参考。
请参阅下面的代码片段。在组合框更改事件中,清除组合框事件并在所需组合框中填充新项目。
Private Sub cmblevels_Change()
cmbTrainer.Clear
Select Case LCase$(cmblevels.Text)
Case "beginner"
cmbTrainer.AddItem "trainer1"
cmbTrainer.AddItem "trainer2"
Case "advanced", "hard"
cmbTrainer.AddItem "trainer3"
cmbTrainer.AddItem "trainer4"
cmbTrainer.AddItem "trainer5"
Case "easy", "medium"
cmbTrainer.AddItem "trainer3"
cmbTrainer.AddItem "trainer6"
cmbTrainer.AddItem "trainer7"
End Select
End Sub
Private Sub cmbSubjects_Change()
cmblevels.Clear
Select Case LCase$(cmbSubjects.Text)
Case "english"
cmblevels.AddItem "beginner"
cmblevels.AddItem "advanced"
Case "maths"
cmblevels.AddItem "easy"
cmblevels.AddItem "medium"
cmblevels.AddItem "hard"
End Select
End Sub
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句