VB检查文本框是否没有特定的数值

Question

我想创建一个基本上说...的if语句。

如果文本框中不包含“1”或“2”或“3” 显示消息框

有人可以告诉我如何正确格式化吗？

谢谢，Cara

Answer 1

经典方式：

If textbox1.Text <> "1" AndAlso textbox1.Text <> "2" AndAlso textbox1.Text <> "3" Then
    MessageBox.Show("Please enter a valid value. Valid are 1,2,3")
End If

更易读和可维护的方式。您可以创建有效值的集合

Dim validValues = {"1", "2", "3"}
If Not validValues.Contains(textbox1.Text) Then
    Dim valids = String.Join(",", validValues)
    MessageBox.Show("Please enter a valid value. Valid are " & valids)
End If