pas de split avec VB5 ?

Question

Bonjour à tous j'utilise VB 5 et je n'arrive pas à me servir de la fonction split est-ce qu'elle existe sour VB 5 ?? voilà mon code : Dim monTab() as String Dim strS as String strS="00101|0012" monTab = split(strS, "|") et VB me renvoie un message d'erreur "erreur de compilation procédure sub ou fonction non définie" merci d'avance aTomicK

crenaud76 · Answer

Et non !! Pas de split en vb5 !! faut le faire &#224; la main, comme les romains !

Dim i as long,L as long,MonTab() as string,S as String
S = "00101|0012|0013"
L = -1
i = instr(s,"|")
while i <>0
  L = L + 1
  redim preserve MonTab(L)
  MonTab(L) = left$(s,i-1)
  s = mid$(s,i+1)
  i = instr(s,"|")
wend

Christophe R

crenaud76 · Answer

Attention ! Avec mon code la chaine S est d&#233;truite !! Penser &#224; la mettre de cot&#233; si besoin de la conserver !!

Christophe R

cs_ITALIA · Answer

Effectivement comme le signale crenaud76 pas de fonction Split en VB5 .
Il y a 5 Fonctions de traitements de text en VB6 qui n'exist&#233; pas en VB5 :
      -Join          
      -Split         
      -InStrRev
      -Replace
      -Reverse

Mais Microft donne le code qui permet de remplacer ces Fonctions
ICI-->http://support.microsoft.com/kb/q188007/

[mailto:It@li It@li]@

Pas de split avec VB5 ?

3 réponses

Discussions similaires