30-07-17, 04:07 PM
اقوم بعملية بحث
حيث لكل عميل مجموعة اكواد
واقوم بكتابة اسم العميل داخل textbox لتظهر الاكودا الخاصة به داخل combobox واجعل القيمة combobox.text=nothing حتى لا تتم عملية البحث الا عتد اختيار كود معين وبعدها تظهر البيانات الخاصة بالكود الذي تم اختياره لهذا العميل
واكتب الكود التالي داخل حدث combobox.selectedindex ليبحث بالاسم الموجود في textbox والكود الذي سيتم اختياره في combobox
Dim com1 As New SqlCommand("select * from table1 where name='"& TextBox1.Text & "' and code='" & combobox1.text & "' ", con)
Dim s1 As New DataSet
Dim t1 As New SqlDataAdapter
t1.SelectCommand = com1
t1.Fill(s1, "table1")
ولكن ما يحدث هو تتم عملية البحث بعد كتاية الاسم مباشرة داخل الtextbox حيث يتم ملأ الcombobox بقيم الكود الخاصة بالاسم وتتم عملية البحث حتى لو قيمة combobox.text=nothing وتظهر البيانات الخاصة باول كود في الكومبو
فهل يوجد طريقة تجعل عملية البحث لا تتم الا عند اختيار الكود من الكومبو
وشكرا
حيث لكل عميل مجموعة اكواد
واقوم بكتابة اسم العميل داخل textbox لتظهر الاكودا الخاصة به داخل combobox واجعل القيمة combobox.text=nothing حتى لا تتم عملية البحث الا عتد اختيار كود معين وبعدها تظهر البيانات الخاصة بالكود الذي تم اختياره لهذا العميل
واكتب الكود التالي داخل حدث combobox.selectedindex ليبحث بالاسم الموجود في textbox والكود الذي سيتم اختياره في combobox
Dim com1 As New SqlCommand("select * from table1 where name='"& TextBox1.Text & "' and code='" & combobox1.text & "' ", con)
Dim s1 As New DataSet
Dim t1 As New SqlDataAdapter
t1.SelectCommand = com1
t1.Fill(s1, "table1")
ولكن ما يحدث هو تتم عملية البحث بعد كتاية الاسم مباشرة داخل الtextbox حيث يتم ملأ الcombobox بقيم الكود الخاصة بالاسم وتتم عملية البحث حتى لو قيمة combobox.text=nothing وتظهر البيانات الخاصة باول كود في الكومبو
فهل يوجد طريقة تجعل عملية البحث لا تتم الا عند اختيار الكود من الكومبو
وشكرا
