非常简单的代码。我从这里跟随另一个示例使用,但它仅以一种方式起作用。如果我首先选择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
答案 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才触发对文本框的更新。希望这会有所帮助。