LastIndexOf dans ArrayList

**stracoma** · 19/12/2014, 23h41

Bonsoir à vous, j'ai besoin de votre aide:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Imports System.Collections
Module Module1
 
    Sub Main()
        Dim l As New ArrayList
        Dim i As Integer
        Dim t As Integer
        l.Add("Saladin")
        l.Add("Zebro")
        l.Add("Alain")
        l.Add("Ahmed")
        i = l.IndexOf("Ahmed")
        t = l.LastIndexOf("Ahmed")
        Console.WriteLine(l.Count.ToString) ' pas de problème: donne 4
        Console.WriteLine(i.ToString) ' pas de problème: donne 3
        Console.WriteLine(t.ToString) ' Problème: donne 3 !!
        Console.ReadKey()
 
    End Sub
 
End Module

Pourquoi t=3 ?
Merci

**Rainui** · 20/12/2014, 12h32

Bonjour,

Parce que z=1 ...

, je plaisante.

En gros, vous lui demandez : Donne moi le dernier index de "Ahmed". Dans la liste, le dernier "Ahmed" est à l'index 3 et il y est qu'une fois, donc il vous donne 3.

Cordialement.

**rv26t** · 20/12/2014, 13h06

Bonjour,

IndexOf donne l'index - il utilise une base 0 (part de 0) - donc l.IndexOf("Ahmed") est le N°3
LastIndex donne l'index du dernier élément nommé "Ahmed" - il utilise une base 0 (les indices commencent à 0, comme IndexOf) - donc le dernier élément nommé "Ahmed" est l'index N°3 (0,1,2,3)
Il est donc normal que l.IndexOf("Ahmed") et l.LastIndexOf("Ahmed") aient la même valeur puisqu'ils représentent la première et dernière occurence du tableau nommé "Ahmed".

Rajoute ces lignes à la suite des ajouts de la liste (count vaudra 6)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
        l.Add("Zebro")
        l.Add("Saladin")
        Console.WriteLine(l.LastIndexOf("Zebro").ToString) ' donne 4 !!

Le résultat vaudra 4 qui est l'index de la dernière occurence de "Zebro".

**stracoma** · 20/12/2014, 16h40

Merci à vous, maintenant je comprends le principe.
Moi j'avais compris que LastIndexOf == IndexOf mais compte à partir du dernier indice.
Thanks

**stracoma** · 20/12/2014, 17h05

Tiré du Tuto de Plassere
Nom : lta4.jpg
Affichages : 117
Taille : 31,6 Ko

**stracoma** · 20/12/2014, 17h27

J'essaie de faire un exemple semblable à : i = l.IndexOf(3,"lulu")

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Imports System.Collections
Module Module1
 
    Sub Main()
        Dim l As New ArrayList
        l.Add("Jacques")
        l.Add("Zebro")
        l.Add("Alain")
        l.Add("Ahmed")
        l.Add("Zebro")
        l.Add("Saladin")
        l.Add("Ahmed")
        l.Add("Zebro")
        l.Add("Saladin")
        Console.WriteLine(l.IndexOf("Saladin").ToString) ' donne 5
        'Console.WriteLine(l.IndexOf(2, "Saladin").ToString) ' comme dans tuto, chez moi donne erreur
        Console.WriteLine(l.IndexOf("Saladin", 2).ToString) ' donne 5 !!
        Console.ReadKey()
 
    End Sub
 
End Module

Pourquoi Console.WriteLine(l.IndexOf("Saladin", 2).ToString) donne 5 alors que je cherche à partir du 2ème élément?
Merci

**rv26t** · 20/12/2014, 17h58

Parceque le premier saladin que l'on pourra trouver depuis l'indice 2 est celui de l'indice 5
Pour trouver le suivant il faut donc démarre après cet indice. (du 6 ce qui donne 8)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

        Console.WriteLine(l.IndexOf("Saladin", 6).ToString) ' donne 8 !!

Sans savoir ou est le premier et l'ignorer afin de trouver le deuxième

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

        Console.WriteLine(l.IndexOf("Saladin", l.IndexOf("Saladin") + 1).ToString) ' donne 8 !!

l'indexOf le plus inclu donne 5 auquel on rajoute 1 et on refait la recherche pour le deuxième (ce qui donne 8)

**stracoma** · 20/12/2014, 18h32

Merci, là je comprends.
J'avais compris (et j'ai tord): "Saladin" est l'élément 5 (si on compte à partir du zéro) et deviendra 3 si je compte à partir de 2. Ce qui est totalement faux, car on ne fait q'une recherche de l'élémnent qui ne peut en aucun cas changer son indice (IndexOf).
Donc ("Saladin",2) veut dire le 1er "Saladin" que je trouve après l'indice 2.
Thanks

**stracoma** · 20/12/2014, 18h34

Et ça résume tout

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

        Console.WriteLine(l.IndexOf("Saladin", l.IndexOf("Saladin") + 1).ToString) ' donne 8 !!

**rv26t** · 20/12/2014, 18h42

Envoyé par stracoma

Merci,
...
Thanks

De rien

**rv26t** · 20/12/2014, 19h50

Envoyé par stracoma

Donc ("Saladin",2) veut dire le 1er "Saladin" que je trouve après l'indice 2.

Attention, pas après, mais à partir de l'indice 2. (indice 2 inclu)

Invité · 20/12/2014, 22h45

Salut,

Tu devrais songer à passer au Namespace System.Collection.Generic.
Il te permet d'utiliser un équivalent d' ArrayList en utilisant List(Of Object).

Un exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
 
Imports System.Collections.Generic
 
Module Module1
 
    Sub Main()
        ' List(Of Object) fourni un équivalent de ArrayList.
        Dim l As New List(Of String) ' With {.Capacity = 10}
        Dim i, t, k, x As Integer
 
        '   Index :    0          1        2        3        4
        l.AddRange({"Saladin", "Zebro", "Ahmed", "Alain", "Ahmed"})
        '   Index :    5          6        7        8        9
        l.AddRange({"Saladin", "Ahmed", "Zebro", "Alain", "Ahmed"})
 
        ' IndexOf signifie en faite FirstIndexOf. 
        ' Il s 'agit de la 1ère occurence trouvé en partant du 1er Index (0).
        i = l.IndexOf("Ahmed")
        ' Symétrique avec FirstIndexOf. 
        ' Il s 'agit de la 1ère occurence trouvé en partant du dernier Index ((Count - 1) = 4).
        t = l.LastIndexOf("Ahmed")
 
        ' FirstIndexOf à partir de Index = 6 (inclus)
        k = l.IndexOf("Ahmed", index:=6)
 
        ' FirstIndexOf à partir de Index = 7 (inclus):
        ' - 1 signifie qu'il n'a pas trouvé l'index. Il correspond à Base - 1 = -1.
        ' C'est pris en compte par les boucle For
        ' For i = 0 To -1
        ' Next
 
        x = l.IndexOf("Ahmed", index:=7, count:=2)
 
        Console.WriteLine(l.Count.ToString) ' pas de problème: donne 4
        Console.WriteLine(i.ToString) ' pas de problème: donne 3
        Console.WriteLine(t.ToString) ' Problème: donne 3 !!
        Console.WriteLine(k.ToString) ' Problème: donne 3 !!
        Console.WriteLine(x.ToString) ' Problème: donne 3 !!
        For Index As Integer = 0 To x
            ' Section jamais executé ici.
            Console.WriteLine("-------------------------------")
        Next
        Console.ReadKey()
 
    End Sub
 
End Module

**stracoma** · 21/12/2014, 00h14

Envoyé par rv26t

Attention, pas après, mais à partir de l'indice 2. (indice 2 inclu)

C'est vrai, petit détaille mais très important, c'est à partir de l'indice2 (inclu) et non pas après

**stracoma** · 21/12/2014, 00h42

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
 
Imports System.Collections.Generic
 
Module Module1
 
    Sub Main()
        ' List(Of Object) fourni un équivalent de ArrayList.
        Dim l As New List(Of String) ' With {.Capacity = 10}
        Dim i, t, k, x As Integer
 
        '   Index :    0          1        2        3        4
        l.AddRange({"Saladin", "Zebro", "Ahmed", "Alain", "Ahmed"})
        '   Index :    5          6        7        8        9
        l.AddRange({"Saladin", "Ahmed", "Zebro", "Alain", "Ahmed"})
 
        ' IndexOf signifie en faite FirstIndexOf. 
        ' Il s 'agit de la 1ère occurence trouvé en partant du 1er Index (0).
        i = l.IndexOf("Ahmed")
        ' Symétrique avec FirstIndexOf. 
        ' Il s 'agit de la 1ère occurence trouvé en partant du dernier Index ((Count - 1) = 4).
        t = l.LastIndexOf("Ahmed")
 
        ' FirstIndexOf à partir de Index = 6 (inclus)
        k = l.IndexOf("Ahmed", index:=6)
 
        ' FirstIndexOf à partir de Index = 7 (inclus):
        ' - 1 signifie qu'il n'a pas trouvé l'index. Il correspond à Base - 1 = -1.
        ' C'est pris en compte par les boucle For
        ' For i = 0 To -1
        ' Next
 
        x = l.IndexOf("Ahmed", index:=7, count:=2)
 
        Console.WriteLine(l.Count.ToString) ' pas de problème: donne 4
        Console.WriteLine(i.ToString) ' pas de problème: donne 3
        Console.WriteLine(t.ToString) ' Problème: donne 3 !!
        Console.WriteLine(k.ToString) ' Problème: donne 3 !!
        Console.WriteLine(x.ToString) ' Problème: donne 3 !!
        Console.WriteLine("===========================")
        For Index As Integer = i To t
            ' (Section jamais executé ici.) cette fois si
            Console.WriteLine("Merci. code assez garni de commentaires pour bien comprendre")
        Next
        Console.ReadKey()
 
    End Sub
 
End Module

LastIndexOf dans ArrayList [Débutant]

VB.NET

Discussions similaires

Partager

Partager