Dim lNb as Integer=0 For Each lStr As String In MaListe if lStr.StartWith("MaChaine") Then lNb+=1 Next
regex.isMatch(taChaine,"toto.jpg_*")
Private Function MonTableau() Dim sTableau As New List(Of String)({"toto.jpg_1", "titi.jpg_1", "toto.jpg_2", "toto.jpg_3", "titi.jpg_2", "titi.jpg_3", "toto.jpg_4"}) Return sTableau End Function Dim DansCesItems As Object = System.Text.RegularExpressions.Regex.IsMatch(MonTableau1, "toto.jpg_*") For each MaValeur in DansCesItems msgbox(MaValeur) Next
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question