منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : سؤال بخصوص الليست بوكس
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم ورحمه الله وبركاته
انا عندي 2 ليست بوكس الأولي ضقت لها items والاخري ضقت لها  items بس عن طريق قاعدة بيانات
الأولي كتبت الكود ده 
Msgbox(listbox1.selected item.   لكي تحصل علي البند ال واقفه عليه
اما الثانيه كتبت نفس الكود بس مش بتظهر شي لماذا
ممكن كود لاظهار البنود في الليست بوكس في حاله اتصالها بقاعدة بيانات
مفيش حل ياجماعه
الفكرة ان اليست بوكس المربوط بداتا بيز عناصره لاتكون من نوع String وانما تكون من نوع سطر بيانات DataRowView

وبالتالي الامر يتطلب التالي 

كود :
       Dim SelectedRow As DataRowView = ListBox1.SelectedItem
       Dim SelectedItem = SelectedRow(ListBox1.DisplayMember)
       MsgBox(SelectedItem)
تعديل :


اتضح ان هناك طريقة اسهل لعمل ذلك بغض النظر عن نوع البيانات في الليست بوكس ، الدالة GetItemText في الليست بوكس
كود :
        MsgBox(ListBox1.GetItemText(ListBox1.SelectedItem))