(05-12-18, 08:09 PM)asemshahen5 كتب :جزاك الله خيراكود :
Dim param As New ArrayList
Private Sub Button3_Click(sender As Object, e As EventArgs) Handles Button3.Click
param.Clear()
For Each row As DataGridViewRow In DataGridView1.Rows
param.Add(row.Cells(0).Value)
Next
End Sub
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
For i = 0 To param.Count - 1
MsgBox(param(i).ToString)
Next
End Sub
شكرا لك
(05-12-18, 09:58 PM)حريف برمجة كتب :جزاك الله خيرا(05-12-18, 07:52 PM)break كتب :(05-12-18, 06:03 PM)asemshahen5 كتب : ما المعلومات الذي تريد تعبئة المصفوفة منها .
ضع صورة لتصورك عما تريده عن طريق الاكسيل او صورة .
افترض حضرتك دى جريد اول عمود اسم الصنف وثانى عمود اسم الصنف
عايز اكون مصفوفة وتعبئتها برقم الصنف
وعمل لوب عليها يطلع ارقام الاصناف فى رسالة متتابعة
هذا المطلوب بدون عمل مصفوفة ،، الدوران يكون مباشر على القريدفيو :
فقط قم بتغيير الخلية(6) بالرقم الذي تريده :
كود :
For i = 0 To dgv.Rows.Count - 1
msgbox(Val(dgv.Rows(i).Cells(6).Value))
Next
شكرا لك
والشكر موصول الى القائمين على هذا المنتدى المبارك