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

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



كيف اجعل قيمة افتراضية للكوبو بكس في الداتاجريد - بسام محمدغانم - 22-06-20

السلام عليكم
كيف اجعل قيمة افتراضية للكوبو بكس في الداتاجريد
لدي داتا جريد و فيها comBox و يحتوي على عناصر لكن عند تحميل الفورم اريد ان يحتوي على قيمة افتراضية او اولية فيه 
هل ذالك ممكن


RE: كيف اجعل قيمة افتراضية للكوبو بكس في الداتاجريد - ابو ليلى - 22-06-20

السلام عليكم و رحمة الله و بركاته
جرب ما يلي
PHP كود :
   Private Sub DataGridView1_CellFormatting(sender As ObjectAs DataGridViewCellFormattingEventArgsHandles DataGridView1.CellFormatting

        If e
.ColumnIndex 1 Then

            e
.Value "name2"
 
       End If

 
   End Sub 



RE: كيف اجعل قيمة افتراضية للكوبو بكس في الداتاجريد - بسام محمدغانم - 23-06-20

(22-06-20, 03:10 AM)ابو ليلى كتب : السلام عليكم و رحمة الله و بركاته
جرب ما يلي
PHP كود :
   Private Sub DataGridView1_CellFormatting(sender As ObjectAs DataGridViewCellFormattingEventArgsHandles DataGridView1.CellFormatting

        If e
.ColumnIndex 1 Then

            e
.Value "name2"
 
       End If

 
   End Sub 
و عليكم السلام و رحمة الله و بركاته
تسلم اخي الكود اشتغل
لكن ال combox فية عناصر من جدول في قاعدة البيانات و اريد احد هذه العناصر المخزنة في القاعدة تضهر بشكل افتراضي


RE: كيف اجعل قيمة افتراضية للكوبو بكس في الداتاجريد - aymnypc - 23-06-20

مهتم بهذا الموضوع اريد جواب مثلك


RE: كيف اجعل قيمة افتراضية للكوبو بكس في الداتاجريد - ابو ليلى - 23-06-20

السلام عليكم و رحمة الله و بركاته
كيف اشتعل معك الكود و اي عناصر عرض ؟؟
اذا لم يكن احد عناصر الكومبو , فاي عنصر عرض؟

PHP كود :
   Private Sub Loading()
 
       Dim DT As New DataTable()
 
       Dim Col1 As New DataColumn("ID")
 
       Dim Col2 As New DataColumn("Names")

 
       DT.Columns.Add(Col1)
 
       DT.Columns.Add(Col2)

 
       DT.Rows.Add(1"Ali")
 
       DT.Rows.Add(2"Ahmad")
 
       DT.Rows.Add(2"Basam")


 
       Cmb_Names.DataSource DT
        Cmb_Names
.DisplayMember "Names"
 
       Cmb_Names.ValueMember "ID"

 
   End Sub 

PHP كود :
   Private Sub DataGridView1_CellFormatting(sender As ObjectAs DataGridViewCellFormattingEventArgsHandles DataGridView1.CellFormatting
        If e
.ColumnIndex 1 Then
            e
.Value "Basam"
 
       End If
 
   End Sub
End 
Class