Discussion :

[fred92g]

Bonjour,

ma fonction de recherche me retourne un problème avec l option strict

conversion du mode integer a string et interdite.

comment je peu faire ?

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 Dim TA As New ArrayList
 
Dim CS As String = TA.Count
 
        Dim i As Integer    'Variable de boucle
        Dim AChercher As String = "treasure" 'String à chercher
        For i = 0 To CS
            If TA(i) Is AChercher Then
                MsgBox(i)
                Exit For
            End If
        Next i

[ProgElecT]

Salut

Dim CS As String = TA.Count curieux de typer une variable en String pour recevoir un entier,
Dim CS As Integer = TA.Count me semble plus logique