تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] استفسار البحث باستخدام ComboBox
#11
اسفه على التاخير اخي ولكن نفس المشكله عندما اقوم بالحبث وظهور السجلات بعد البحث في الداتا جريد فيو وعند الضغط على السجل لا يتم عرضه في التكست بوكس
الرد }}}
تم الشكر بواسطة:
#12
في زر البحث 
PHP كود :
Dim Query As String "Select * From car_t Where 1=1"
 
       If String.IsNullOrWhiteSpace(Me.ComboBox1.TextThen
            MsgBox
("Field is empty"MsgBoxStyle.Critical"Error")
 
           Me.ComboBox1.DroppedDown True
            Return
        End 
If
 
       If ComboBox1.SelectedIndex 0 Then
            If txtValue
.Text <> "" Then
                Query 
Query " AND car2 = '" txtValue.Text "'"
 
           End If
 
       End If

 
       If ComboBox1.SelectedIndex 1 Then
            If txtValue
.Text <> "" Then
                Query 
Query " AND car3 = '" txtValue.Text "'"
 
           End If
 
       End If

 
       If ComboBox1.SelectedIndex 2 Then
            If txtValue
.Text <> "" Then
                Query 
Query " AND car5 = '" txtValue.Text "'"
 
           End If
 
       End If
 
       Dim cmd As New OleDbCommand(Querycon)
 
       da = New OleDbDataAdapter(cmd)
 
       ds.Clear()
 
       da.Fill(ds"car_t")
 
       Me.DataGridView1.DataSource ds 
Wink
التغيير في اخر 3 سطور فقط
لتصبح
PHP كود :
ds.Clear()
 
       da.Fill(ds"car_t")
 
       Me.DataGridView1.DataSource ds 
الرد }}}
تم الشكر بواسطة: امل حسن
#13
اشكركم جميعا تم حل المشكله بكود HASAN6.0 وشكرا لك اخي

وشكرا لك اخي khodor1985 على مساعدتك
واشكركم جميعا
الرد }}}
تم الشكر بواسطة: HASAN6.0
#14
اشكرك اخي على مساعدتك
الرد }}}
تم الشكر بواسطة: khodor1985



التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم