Private Sub DGV_CellContentClick(ByVal sender As System.Object, _
                                 ByVal e As _
                                 System.Windows.Forms.DataGridViewCellEventArgs_
                                 ) _
                                 Handles DGV.CellContentClick
    Me.DGV.EndEdit()'die bearbeitung muss erstmal abgeschlossen werden
    Try
      MsgBox(DGV.SelectedCells.Item(0).RowIndex.ToString & ";" & _
             DGV.SelectedCells.Item(0).ColumnIndex.ToString & ";" & _
             DGV.SelectedCells.Item(0).Value.ToString)
    Catch ex As Exception
      MsgBox(ex.Message)
    End Try
 
  End Sub