Pour ceux qui peuvent vouloir éviter ma recherche est ici le code totale j'ai fini par déconcertant ensemble qui est en mesure de livrer:
- index de la ligne actuelle
- index de la colonne actuelle
- tête de colonne actuelle Et
est capable d'exposer la valeur/s de colonnes sur la ligne.
Le code passe en cas MouseLeftButtonUp et DGrid1 est le nom de la grille
Dim currentRowIndex As Integer = -1
Dim CurrentColumnIndex As Integer = -1
Dim CurrentColumnHeader As String = ""
Dim Myrow As DataRowView = Nothing
Dim dep As DependencyObject = DirectCast(e.OriginalSource, DependencyObject)
While dep IsNot Nothing And Not TypeOf dep Is DataGridCell And Not TypeOf dep Is Primitives.DataGridColumnHeader
dep = VisualTreeHelper.GetParent(dep)
If dep IsNot Nothing Then
If TypeOf dep Is DataGridCell Then
Dim cell As DataGridCell = DirectCast(dep, DataGridCell)
Dim col As DataGridBoundColumn = DirectCast(cell.Column, DataGridBoundColumn)
Myrow = DGrid1.SelectedItem
CurrentColumnHeader = col.Header.ToString
CurrentColumnIndex = col.DisplayIndex
currentRowIndex = DGrid1.Items.IndexOf(DGrid1.CurrentItem)
Exit While
End If
End If
End While
If currentRowIndex = -1 OrElse CurrentColumnIndex = -1 OrElse CurrentColumnHeader = "" OrElse Myrow Is Nothing Then Exit Sub
'code to consume the variables from here
Dim strinwar As String = Myrow.Item("header name or index").ToString()
Malheureusement j'ai essayé environ 3 différents C à VB convertisseurs et non ont été en mesure de convertir ce code à VB – user1500403
J'ai pu utiliser cet article, merci. – user1500403