案例陈述问题

Question

我有一个用户表单。

我希望找出能够检查多个标准的案例陈述是否可能。

例如：

• 我的客户在ComboBox1中，每个客户都有不同类型的进度和规格。
• 我在ComboBox2中有进展类型，在TextBox1有规范。
• 如果用户选择Customer（ComboBox1）ABC，则进度类型（ComboBox2）应列出Ni和NiAu。
• 当用户选择Ni时，规格（TextBox1）应显示30S，而如果用户选择NiAu，则规格（TextBox1）应显示40S。
• 如果用户选择Customer（ComboBox1）DEF，则进度类型（ComboBox2）应列出Pd和PdAu。当用户选择Pd时，规范（TextBox1）应显示10A，而如果用户选择PdAu，则规范（TextBox1）应显示15S。

我的代码看起来像这样，但它不会相应地列出规范。

Private Sub ComboBox1_Change()

  Select Case ComboBox1

  Case "ABC"
    ComboBox2.List =  Array("Ni", "NiAu")
    If ComboBox2.Value="Ni"
      TextBox1.Value="30S"
    Else If ComboBox2.Value="NiAu"
      TextBox1.Value="40S"
    End If
    End If

  Case "DEF"
    ComboBox2.List =  Array("Pd", "PdAu")
    If ComboBox2.Value="Pd"
      TextBox1.Value="10A"
    Else If ComboBox2.Value="PdAu"
      TextBox1.Value="15S"
    End If
    End If
End Sub