使用带有2个组合框的IF语句来确定文本框的值?

时间:2019-03-07 20:01:07

标签: vba if-statement combobox

非常简单的代码。我从这里跟随另一个示例使用,但它仅以一种方式起作用。如果我首先选择combobox7作为“是”,而选择Combobox8作为“否”,则它将通过它,但是只有当我单击两次时,这意味着我必须在Combobox7上重新选择“否”,然后选择“是”,以获得所需的效果。结果。底线是,ComboBox7 =“否”,ComboBox8 =“否”,然后TextBox8.value =“失败”,否则为“通过”。 我一点儿也不在乎VBA,所以我还不如初学者那么高,所以请保持温柔。我在这个网站上被称为许多粗鲁的名字,只是因为我不如您的主持人知道它,导致我完全离开了这个网站,但是我找不到这个网站的答案。其作用不稳定。谁能以一种友好的方式提供帮助?同样,这里比菜鸟还低!不想被放下,只是试图理解这一点。谢谢。

Private Sub ComboBox7_Change()
    If ComboBox7.Value = "No" And ComboBox8.Value Like "No" Then
        TextBox8.Value = "Fail"
    Else
        TextBox8.Value = "Pass"
    End If
End Sub

1 个答案:

答案 0 :(得分:2)

您只需要为其他控件再次添加相同的内容即可。例如:

Private Sub ComboBox7_Change()
    If ComboBox7.Value = "No" And ComboBox7.Value Like "No" Then
        TextBox8.Value = "Fail"
    Else
        TextBox.Value = "Pass"
    End If
End Sub

Private Sub ComboBox8_Change()
    If ComboBox7.Value = "No" And ComboBox8.Value Like "No" Then
        TextBox8.Value = "Fail"
    Else
        TextBox8.Value = "Pass"
    End If
End Sub

编辑:这是因为仅通过更改示例中的ComboBox7才触发对文本框的更新。希望这会有所帮助。