Name Restrictions

[mustorze]

I made a plan ...

Code:

Private Sub Command1_Click()
Dim omg() As String
Texta = "law,omh,awhj,noob" 'Names...
omg = Split(Texta, ",")
For i = 0 To 3 'number of words starts from 0
If omg(i) = nameoftextbox.Text Then
MsgBox "go to hell"
End If
Next i
End Sub

try....