[هاوي1995]

السلام عليكم ورحمة الله وبركاته
عندي كومبوبوكس 1 = يتم تعبئته باسماء مؤلفين الكتب
عندي ليست بوكس1 = يتم تعبتئه باسم الكتب عند اختيار اسم المؤلف من الكومبوبكس 1
عندي داتاقريد فيو1 = يتم عرض البيانات الصحيحة فيها عند ضغط زر عرض ولابد تحديد اسم المؤلف واسم الكتاب
culom 1 = اسم المؤلف
culom2 = اسم الكتب

اللي توصلت له كود تعبئة الكومبوبوكس 1

كود :

Dim cmd As New OleDbCommand
   Dim reader As OleDbDataReader
      cmd = New OleDbCommand("select * from table1", cn)
      cn.Open()
      reader = cmd.ExecuteReader
      While reader.Read
         If ComboBox1.Items.Contains(reader.Item(1)) = False Then
               ComboBox1.Items.Add(reader.Item(1))
           End If
      End While

      cn.Close()
  End Sub

---

عندي التباس بكيفية ربط الادوات مع بعضها البعض