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

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

كود :

Sub DGV()

        With dgv_product

            .Columns(0).HeaderText = "كود"

            .Columns(1).HeaderText = "الصنف"

            '.Columns(1).HeaderCell = ComboBox.Cells(1).Selected.

            .Columns(2).HeaderText = "النوع"

            .Columns(3).HeaderText = "المجموعه"

            .Columns(4).HeaderText = "الوحدة"

            .Columns(5).HeaderText = "الكمية"

            .Columns(6).HeaderText = "السعر"

            .Columns(7).HeaderText = "الاجمالى"

        End With

    End Sub

كود :

   Dim Cmb As New DataGridViewComboBoxColumn()

Cmb.HeaderText = "Male or Female"

Cmb.Name = "cmb"

Cmb.MaxDropDownItems = 2

Cmb.Items.Add("Male")

Cmb.Items.Add("Female")

Me.DataGridView1.Columns.Add(Cmb)

(30-01-23, 12:21 AM)عبد العزيز البسكري كتب : [ -> ]

كود :

Dim Cmb As New DataGridViewComboBoxColumn() Cmb.HeaderText = "Male or Female" Cmb.Name = "cmb" Cmb.MaxDropDownItems = 2 Cmb.Items.Add("Male") Cmb.Items.Add("Female") Me.DataGridView1.Columns.Add(Cmb)

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

(30-01-23, 01:33 AM)خالد كامل1 كتب : [ -> ]
(30-01-23, 12:21 AM)عبد العزيز البسكري كتب : [ -> ]

كود :

Dim Cmb As New DataGridViewComboBoxColumn() Cmb.HeaderText = "Male or Female" Cmb.Name = "cmb" Cmb.MaxDropDownItems = 2 Cmb.Items.Add("Male") Cmb.Items.Add("Female") Me.DataGridView1.Columns.Add(Cmb)

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

بسيطة أخي الكريم

فقط أضف هذا السطر كمثال

Cmb.DisplayIndex = 2

هنا سيتم إضافتها بالعمود الثالث على أساس نبدأ العد من الصفر