[Abu Ehab]

أوكي

كود :

      Dim db As DbDataContext = New DbDataContext()
       Dim tb As Employee
       tb = (From c In db.Employees Where c.Emp_Name = txtEmployeeName.Text Select c).Single()
       If tb.ID <> 0 Then
           MessageBox.Show("This Employee Existed")
           Exit Sub
       Else
           ' Start Save
       End If
   End Sub