FONCTIONS DE VÉRIFICATION DE LA SYNTAXE D'UNE CHAINE
cs_Nurgle
Messages postés1642Date d'inscriptionsamedi 6 novembre 2004StatutMembreDernière intervention28 avril 2011
-
7 oct. 2005 à 18:01
rayouma2010
Messages postés3Date d'inscriptionmercredi 10 janvier 2007StatutMembreDernière intervention23 mai 2010
-
17 mai 2007 à 06:48
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.
rayouma2010
Messages postés3Date d'inscriptionmercredi 10 janvier 2007StatutMembreDernière intervention23 mai 2010 17 mai 2007 à 06:48
Un code très util. Merci bien et bonne continuation.
cs_Nurgle
Messages postés1642Date d'inscriptionsamedi 6 novembre 2004StatutMembreDernière intervention28 avril 20114 24 oct. 2005 à 18:49
Pourquoi pas ça pour la function TrieBulle :
Public Shared Function TrieBulle(ByVal chaine As String) As String
Dim strTemp() As Char = chaine.ToCharArray
Dim strTemp2 As String = ""
Dim I As Integer
Array.Sort(strTemp)
For I = 0 To (strTemp.Length - 1)
strTemp2 = strTemp2 & strTemp(I)
Next
Return strTemp2
End Function
non ?
Parce que, quand on a "Option Strict On", le strTemp As System.Array génère une erreur de "late binding" !
cs_Nurgle
Messages postés1642Date d'inscriptionsamedi 6 novembre 2004StatutMembreDernière intervention28 avril 20114 7 oct. 2005 à 18:01
cool ! ça c'est le genre de truc hyper-utile que je n'avais pas envie de refaire moi-même :D
(par pure flemme sans doute)
17 mai 2007 à 06:48
24 oct. 2005 à 18:49
Public Shared Function TrieBulle(ByVal chaine As String) As String
Dim strTemp() As Char = chaine.ToCharArray
Dim strTemp2 As String = ""
Dim I As Integer
Array.Sort(strTemp)
For I = 0 To (strTemp.Length - 1)
strTemp2 = strTemp2 & strTemp(I)
Next
Return strTemp2
End Function
non ?
Parce que, quand on a "Option Strict On", le strTemp As System.Array génère une erreur de "late binding" !
7 oct. 2005 à 18:01
(par pure flemme sans doute)
10/10 !