[سعود]

طيب كود التحقق اللي انت كاتبه:

كود :

If TextBox1.BackColor = Color.Red Then
                TextBox1.Clear()
                MsgBox("الاسم محجوز , فضلا جرب اسما آخر ", MsgBoxStyle.Critical, "")
                TextBox1.Focus()
                Exit Sub
            End If

هذا يتحقق من لون خلفية مربع النص
يعني عدل عليه ليكون:

كود :

If isfound(TextBox1.Text) Then
                TextBox1.BackColor = Color.Red
                TextBox1.Clear()
                MsgBox("الاسم محجوز , فضلا جرب اسما آخر ", MsgBoxStyle.Critical, "")
                TextBox1.Focus()
                Exit Sub
            End If