Visual Basic

Public Class Form1

    Private _ProductList As List(Of Product) = New List(Of Product)

    Private Class Products
        Private _ProductList As List(Of Product)

        Public Sub AddProduct(ByVal NewProduct As Product)
            _ProductList.Add(NewProduct)
        End Sub

    End Class

    Private Class Product
        Private _ProductID As String
        Private _Price As Double

        Public Sub New(ByVal ProductID As String, ByVal Price As Double)
            _ProductID = ProductID
            _Price = Price
        End Sub

        Public ReadOnly Property ProductID() As String
            Get
                Return _ProductID
            End Get
        End Property

        Public ReadOnly Property Price() As Double
            Get
                Return _Price
            End Get
        End Property

    End Class

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        _ProductList.Add(New Product("Product1", 100))
        _ProductList.Add(New Product("Product2", 200))
        _ProductList.Add(New Product("Product3", 300))
        _ProductList.Add(New Product("Product4", 400))
        _ProductList.Add(New Product("Product5", 500))

        TheDGV.DataSource = _ProductList

    End Sub

    Private Sub TheDGV_CellClick(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles TheDGV.CellClick
        'Use this if you just want to transfer the value when the cell is clicked
        TextBox1.Text = TheDGV.Rows(e.RowIndex).Cells(e.ColumnIndex).Value.ToString()
    End Sub

    Private Sub TheDGV_CellContentClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles TheDGV.CellContentClick
        'Use this if you want it to transfer the value when the actual text within the cell is clicked
        TextBox1.Text = TheDGV.Rows(e.RowIndex).Cells(e.ColumnIndex).Value.ToString()

    End Sub
End Class

For v = 0 To DataGridView1.Rows.Count - 1
   id = DataGridView1.Rows(v).Cells(0).value
   'Do your thing'
Next v

zafax_ wrote:

the code is working fine

For Each row As Windows.Forms.DataGridViewRow In Me.DataGridView1.Rows()
  Dim searchVal as String
  searchVal = row.cell(1).value
  cmd.Parameters.Add("@name", SqlDbType.NVarChar).Value = searchVal
next row

I are Troll

For Each row As DataGridViewRow In DataGridView.Rows
    For Each cell As DataGridViewCell In row.Cells
        'Do your necessary test etc against each cell here
    Next
Next