+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=32049)
ماهي طريقة نقل جميع محتويات كومبوبوكس على خلية واحدة معينة في الداتاقريد فيو - جيولوجي مبتدئ - 10-11-19
السلام عليكم ورحمة الله وبركاته
ماهي طريقة نقل جميع محتويات كومبوبوكس على خلية واحدة معينة في الداتاقريد فيو
لكم جزيل الشكر
RE: ماهي طريقة نقل جميع محتويات كومبوبوكس على خلية واحدة معينة في الداتاقريد فيو - حريف برمجة - 10-11-19
وعليكم السلام ورحمة الله وبركاته ،،
تجعل الخلية المعينة في الداتاقريدفيو نوعها كومبوبوكس وتتعامل معه كأي أداة كومبوبوكس .
RE: ماهي طريقة نقل جميع محتويات كومبوبوكس على خلية واحدة معينة في الداتاقريد فيو - جيولوجي مبتدئ - 10-11-19
شكراً أخي حريف برمجة على سرعة الرد
ولكنني أريد أن أنقل المحتويات بجانب بعضها البعض بحيث تظهر كنص
شكر الله سعيك
RE: ماهي طريقة نقل جميع محتويات كومبوبوكس على خلية واحدة معينة في الداتاقريد فيو - علي نوري - 12-11-19
عليكم السلام
كود :
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
On Error Resume Next
' تحديد الخلية من قبل المستخدم
For i = 0 To ComboBox1.Items.Count - 1
DataGridView1.CurrentCell.Value &= ComboBox1.Items.Item(i)
Next i
End Sub
Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
On Error Resume Next
' الاضافة بالخلية 0
For i = 0 To ComboBox1.Items.Count - 1
DataGridView1.Rows(0).Cells(0).Value &= ComboBox1.Items.Item(i)
Next i
End Sub
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
On Error Resume Next
' الاضافة بالخلية 1
For i = 0 To ComboBox1.Items.Count - 1
DataGridView1.Rows(0).Cells(1).Value &= ComboBox1.Items.Item(i)
Next i
End Sub