codice:
 Private Sub DataGridView1_CellClick(ByVal sender As System.Object, ByVal e As System.Windows.Forms.DataGridViewCellEventArgs) Handles DataGridView1.CellClick
        Dim name As String = DataGridView1.Columns.Item(e.ColumnIndex).Name
        name = DataGridView1.Columns.Item(e.ColumnIndex).HeaderText
    End Sub