[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