[Doctor GME]

اقتربنا كثيراً وأشكرك على تعبك ومجهودك الكبير
تم حل المشكلة الأولى وهى ظهور ال dose بشكل صحيح
وأيضاً ظهور ال route المقابل لها بشكل صحيح
ولكن كما سبق وقلت لك يظهر جميع ال route
وأنا أريد أن يظهر النتيجة المقابله فقط لما تم اختياره من dose
المشكل الآن فى هذه الجزئية فقط ويكون الأمر منتهى

كود :

   Private Sub MedDose_SelectedIndexChanged(sender As Object, e As EventArgs) Handles MedDose.SelectedIndexChanged

       If MedType.SelectedItem = ("Analgesics") Then

           Dim dt2 As New DataTable
           dt2.Clear()
           Dim sql2 As String = "SELECT * FROM Analgesics WHERE Analgesics = '" & MedName.SelectedItem & "' ORDER BY ID ASC"
           da = New OleDbDataAdapter(sql2, cnn)
           cm = New OleDbCommandBuilder(da)
           da.Fill(dt2)
           Dim routes As String = dt2(0)(3)
           Dim route As String() = routes.Split("-")
           For ii As Integer = 0 To route.Count - 1
               MedRoute.Items.Add(route(ii))
           Next

       End If

   End Sub

كما تلاحظ أخى فى جملة

كود :

Dim sql2 As String = "SELECT * FROM Analgesics WHERE Analgesics = '" & MedName.SelectedItem & "' ORDER BY ID ASC"

أن المقارنة مع MedName.SelectedItem وهذا ما يسبب المشكلة
أنا أريده مع MedDose.SelectedItem التى تم اختيارها بعد split
وقد أرفقت لك الكود بعد تعديله قليلاً
ولا تتعب نفسك فى جزء Antibiotics فأنا سأكتبه بعد حل المشكلة فلا تضيع وقتك معه
وشكراً لك مجدداً