منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[كود] طريقة ملئ COMBOBOX بقواعد البيانات الموجودة على السيرفر - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم مكتبة اكواد VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=185)
+--- الموضوع : [كود] طريقة ملئ COMBOBOX بقواعد البيانات الموجودة على السيرفر (/showthread.php?tid=26102)

طريقة ملئ COMBOBOX بقواعد البيانات الموجودة على السيرفر - galas - 13-08-18

طريقة ملئ كومبو بوكس بقواعد البيانات الموجودة على السيرفر
استخدم هذه الدالة :

كود :
Public Sub Charger_CB(cmd As String, tableau As String, cb As ComboBox, val As String)
       Try
           If myConnection.State = ConnectionState.Closed Then
               myConnection.Open()
           End If
           ds = New DataSet 'vider ds
           Dim da As New OleDbDataAdapter(cmd, myConnection)
           da.Fill(ds, tableau)
           dv = New DataView(ds.Tables(tableau))
           cb.DataSource = dv
           cb.ValueMember = val
           cb.DisplayMember = val
           myConnection.Close()
       Catch ex As Exception
           MsgBox(ex.Message)
       End Try
   End Sub


مثال  على كيفية إستدعاء الدالة :

كود :
Charger_CB("SELECT * FROM tbPersonnel", "Matricule", ComboBoxAddIntervenantPrev, "Matricule")


الدالة لها 4 عناصر :
الأول : الكويري : "SELECT * FROM tbPersonnel"
الثاني : إسم العمود في قاعدة البيانات : "Matricule"
الثالث : إسم اكمبوبكس : ComboBoxAddIntervenantPrev
الرابع : إسم العمود في قاعدة البيانات : "Matricule"


دعواتكم بالتوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }

ساهم دائماً فى تقديم    لكل من يقوم بالمساهمة
فى حل اى مشكلة او استفسار لديك مع اضافة رد بشكره ودعوة له
فالجميع هنا يعمل على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


RE: طريقة ملئ COMBOBOX بقواعد البيانات الموجودة على السيرفر - count4love - 03-08-19

السلام عليكم
جزاك الله خيرا علي الكود الجميل
بس في ملاحظات
بعض المتغيرات مش شعالة ودا لانها مش متعرفةزي مثلا DA فياريت التوضيح
لاني كتبت الكود وتقريبا اغلبهم عايز اعلان
وشكرا