[VB 2005]Effacer une ligne dans un tableauRésolu

Question

Bonjour !

Voila j'ai un tableau a plusieur dimention déclaré comme ceci :

    Public Structure tformat
        Dim tId As String
        Dim tNom As String
        Dim tPrenom As String
        Dim tEmail As String
        ...
    End Structure

Public Tableau() As tformat

Et j'aurai voulu savoir comment faire pour supprimer des éléments ?
Je sais que c'est faisable avec Array.Copy mais je ne sais pas si c'est faisable dans mon cas !
(du moins je n'y arrive pas :s )

Merci
Clad

Utilisateur anonyme · Accepted Answer

Salut,

Oui, faisable avec copy :



Private Sub RemoveItem(ByRef Tab() As tformat, ByVal Index As Integer)
  System.Array.Copy(Tab, Index + 1, Tab, Index, Tab.Length - Index - 1)
  System.Array.Resize(Of tformat)(Tab, Tab.Length - 1)
End Sub,

----

(Coloration syntaxique automatique par Kenji)





__________
Kenji

Clad49 · Answer

Je te remerci beaucoup ca marche nikel ;)

Clad

Clad49 · Answer

Ah si pendant que tu es là ;)

Connait tu un system pour trier ce genre de tableau avec Array.Sort ?

Merci
Clad

Utilisateur anonyme · Answer

Voir aide en ligne :

http://msdn2.microsoft.com/fr-fr/library/system.array.sort(VS.80).aspx




System.Array.Sort(Of tformat)(Tableau, AddressOf Comparetformat)

Private Function Comparetformat(ByVal x As tformat, ByVal y As tformat) As Integer
  If x.tId < y.tId Then Return -1
  If x.tId = y.tId Then Return 0
  If x.tId > y.tId Then Return 1
End Function,

----

(Coloration syntaxique automatique par Kenji)





__________
Kenji

[VB 2005]Effacer une ligne dans un tableau

4 réponses

Votre réponse

Discussions similaires