[تناسيم]

السلام عليكم

اقوم يكتابة كود select في حدث combobox1.selectedindex

Dim com1 As New SqlCommand("select * from table_1 where id='" & Val(ComboBox4.Text) & "' ", con)
Dim s1 As New DataSet
Dim t1 As New SqlDataAdapter
t1.SelectCommand = com1
t1.Fill(s1, "table_1")
If s1.Tables(0).Rows.Count <> 0 Then
ComboBox1.DataSource = s1.Tables("table_1")
ComboBox1.DisplayMember = "name"
ComboBox1.ValueMember = "name"
End If
ولكن لا يعرض الداتا في combobox1 على الرغم من اني قمت بكتابة الكود في الجدول الخاص بالداتا في ال sql وتم عرض الاسم الخاص بال id
ملحوظة الكود يعمل في مكان اخر من الproject
ملحوظة تتكرر كثيرا هذه المشكلة الخاصة ب امر select في حدث combobox.selectedindex
ارجو الافادة وشكرا