[karim5009]

انا عامل فورم فيه البحث عن طريق كومبو بوكس بالاسم و رقم الهاتف لما اختار البحث بالاسم مش بيطلع اى نتائج لما بختار بالهاتف بتطلع النتائج صحيحة
الكود :
Private Sub TextBox1_TextChanged(sender As Object, e As EventArgs) Handles TextBox1.TextChanged

If ComboBox1.SelectedIndex = 0 Then

Dim DT As New DataTable
Dim DA As New SqlClient.SqlDataAdapter
DT.Clear()
DA = New SqlClient.SqlDataAdapter("SELECT * FROM Customers WHERE STATE = 'TRUE' AND Cus_NAME LIKE '%" & TextBox1.Text & "%'ORDER BY Cus_NAME", sqlconn)
DA.Fill(DT)
DataGridView1.DataSource = DT.DefaultView
Else
ComboBox1.SelectedIndex = 1
Dim DT As New DataTable
Dim DA As New SqlClient.SqlDataAdapter
DT.Clear()
DA = New SqlClient.SqlDataAdapter("SELECT * FROM Customers WHERE STATE = 'TRUE' AND Cus_PHONE LIKE '%" & TextBox1.Text & "%'", sqlconn)
DA.Fill(DT)
DataGridView1.DataSource = DT.DefaultView
End If

End Sub
End Class