Condition sur deux tableau

Résolu
infodes Messages postés 50 Date d'inscription mardi 26 novembre 2013 Statut Membre Dernière intervention 21 décembre 2023 - 12 nov. 2014 à 14:16
infodes Messages postés 50 Date d'inscription mardi 26 novembre 2013 Statut Membre Dernière intervention 21 décembre 2023 - 13 nov. 2014 à 16:14
Bonjour,

je cherche à faire un condition sur deux tableaux. Je ne sais pas si c'est possible.

j'ai un premier tableau dans le quelle j'ai 13 éléments exemple et un deuxième dans le quelle j'ai 35 éléments exemple. Ce sont des listes.
J'utilise deux variables. Ma variable1 contient un élément de la liste du tableau1 et ma variable2 un élément de la liste du tableau2.

Ce que je veux faire:

si ma variable1 dans mon tableau1 = ma variable2 dans mon tableau2 alors
exécute tel action
autrement
exécute tel autre action
fin
Mes variables dans les deux tableaux sont des string. tableau 1 = a,b,c,d,etc.
tableau2 = tes, rdf, bpr, etc.

J'espère que c'est assez clair.

merci

4 réponses

cs_ShayW Messages postés 3253 Date d'inscription jeudi 26 novembre 2009 Statut Membre Dernière intervention 3 décembre 2019 57
Modifié par cs_ShayW le 12/11/2014 à 15:13
Bonjour
montre comment tableau est défini et comment liste est défini
0
infodes Messages postés 50 Date d'inscription mardi 26 novembre 2013 Statut Membre Dernière intervention 21 décembre 2023
Modifié par jordane45 le 12/11/2014 à 16:50
bonjour, voilà mes 2 tableaux.

Dim prefixnom1 As New List(Of String) From {"J", "j", "HS", "hs", "QD", "qd", "RPA", "rpa", "DRW", "drw", "RPR", "rpr", "RCH", "rch", "RTA", _
                                                            "rta", "RSAT", "rsat", "RCAN", "rcan", "RTAB", "rtab", "RFOU", "rfou", "HYCK", "hyck", "MEMY", _
                                                            "memy", "MEPA", "mepa", "OBSO", "obso", "RCONV", "rconv", "RDOMP", "rdomp", "RTEU", "rteu", "RTRAN", _
                                                            "RRAIL", "rrail", "RDRIV", "rdriv", "RCOIN", "rcoin", "RPLFO", "rplfo", "RTEVI", "rtevi", _
                                                            "RECAR", "recar", "RPLAT", "rplat", "RTUYA", "rtuya", "RRIOP", "rriop"}

et
Dim prefixnom As New List(Of String) From {"RA", "RB", "RC", "RD", "RE", "RF", "RG", "RH", "RI", "RP", "RR", "RHZ", "RZ", "RS"}


EDIT : AJOUT DES BALISES DE CODE !
0
jordane45 Messages postés 38144 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 21 avril 2024 344
12 nov. 2014 à 16:51
Merci de bien vouloir utiliser la coloration syntaxique (les balises de code) lorsque tu postes du code sur le forum.
Explications disponibles ici :
http://codes-sources.commentcamarche.net/faq/10686-le-nouveau-codes-sources-comment-ca-marche#balises-code

J'ai édité ton message pour les mettre... merci d'y penser la prochaine fois !
0
vb95 Messages postés 3472 Date d'inscription samedi 11 janvier 2014 Statut Contributeur Dernière intervention 13 avril 2024 169
12 nov. 2014 à 18:13
deux boucles imbriquées et un test dégalité entre les 2 variables de chaque tableau

For i = 0 to 15
For j = 0 to 25
if var(i) = var(j) then
' action si égalité
Else
'action si différence
End if
next
next
0
infodes Messages postés 50 Date d'inscription mardi 26 novembre 2013 Statut Membre Dernière intervention 21 décembre 2023
13 nov. 2014 à 16:14
Merci ça fonctionne très bien. :-)
0
Rejoignez-nous