VB.NET - Recupere les valeurs distinct Array

Résolu/Fermé

Freedomsoul - 5 juil. 2011 à 13:00
Freedomsoul - 5 juil. 2011 à 13:55

Bonjour,

Alors voilà, j'ai un tableau de structure de la forme

Public Structure struct
Dim type1 As String
Dim type2 As String
Dim type3 As String
Dim type4 As String
End Structure

et un tableau du type de cette structure:

Public machin() As struct

J'aimerai récuperer toutes les valeurs distincts de type4, par exemple :)

J'ai bien trouvé le
dim arr as array = machin.distinct.toarray
Mais il prend la premiere colonne :s

Help \o/

A voir également:

VB.NET - Recupere les valeurs distinct Array
Comment récupérer les messages supprimés sur whatsapp - Guide
Excel liste de valeurs - Guide
Comment récupérer toutes les photos de google photo ? - Guide
Faites afficher avec un fond coloré les cellules qui contiennent une valeur comprise entre 250 et 350. quel nombre est dessiné en surbrillance ? ✓ - Forum Excel
Recupere au terminal de fret - Forum Consommation & Internet

2 réponses

Réponse 1 / 2

Utilisateur anonyme
5 juil. 2011 à 13:48

Salut,

Tu peux toujours le faire manuellement !

Dim arr As New ArrayList
Dim Compteur As Int64 = 0
Dim Texte As String = String.Empty

For Compteur = 0 To (machin.LongCount - 1)
    If Not (arr.Contains(machin(CType(Compteur, Int32)).type4)) Then
        arr.Add(machin(CType(Compteur, Int32)).type4)
    End If
Next

For Compteur = 0 To (arr.Count - 1)
    Texte = Texte & CType(arr(CType(Compteur, Int32)), String) & vbCrLf
Next

MessageBox.Show(Texte)
'

Cdt

Lupin

Réponse 2 / 2

Freedomsoul
5 juil. 2011 à 13:55

Bon bin, Okay, je vais faire comme ça !

Merci beaucoup, ça fonctionne nikel :)

Discussions similaires

Colis shein terminal fret

Compter valeurs unique avec condition

Souci avec ma commande shein

Première connexion

GeForce Experience "Impossible de récuperer les paramètres"