Ciao a tutti, eccomi di nuovo qui con una semplice domanda ma che non riesco a trovare soluzione.

Come posso gestire questo tipo di condizione IF senza dover ripetere ogni volta il codice?

If TextBox1.Text = "00000000" Then MsgBox("Valore non valido", vbCritical, "Errore")
If TextBox1.Text = "11111111" Then MsgBox("Valore non valido", vbCritical, "Errore")
If TextBox1.Text = "22222222" Then MsgBox("Valore non valido", vbCritical, "Errore")
If TextBox1.Text = "33333333" Then MsgBox("Valore non valido", vbCritical, "Errore")
....etc

Possibile che per ogni valore debba riscrivere la stringa?

Non esiste un qualcosa del tipo:

If TextBox1.Text = "00000000" oppure "11111111" oppure "22222222" oppure "33333333" Then MsgBox("Valore non valido", vbCritical, "Errore")

A buon rendere...