• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

البحث في المنتدى

Showing results for tags 'كامبوبوكس'.

  • البحث بالتاقات

    اكتب الكلمات المفتاحيه بينها علامه الفاصله
  • البحث بكاتب الموضوع

تم إيجاد 1 نتيجة

  1. بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته   مشكلتي هي في تعبئة comboBox.......  حيث لاتتعبئ مع عدم ظهور خطأ في الكود. وسوف اقوم بتوضيح الاكواد ....     هذا كلاس يحنوي على دالة تقوم بتعبئة ال comboBox ' دالة تعبئة الكمبو بوكسPublic Sub FillComboBox(ByVal cbo As ComboBox, ByVal TableName As String, ByVal Col_Name As String, ByVal Col_Value As String, ByVal WHR As String)TryDim VarSql As StringVarSql = ""VarSql = "select" + Col_Name + "," + Col_Value + " from" + TableName + "" + WHRDim sda As New SqlDataAdapter(VarSql, sqlcon)Dim ds As New DataSet()sda.Fill(ds)cbo.DataSource = ds.Tables(3)cbo.DisplayMember = Col_Namecbo.ValueMember = Col_ValueCatchEnd TryEnd SubEnd Classوهذا كود الذي يقوم بربط الcomboBox  بالجدول Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.LoadWinClass.FillComboBox(ComboBox1, "Type", "TypeName", "TypeId", "")End Sub