RESOLU: comment decouper une phrase ?

RESOLU: comment decouper une phrase ? - VB/VBA/VBS - Programmation

Marsh Posté le 04-05-2006 à 18:00:07    

Bonjour. existe-t-il une fonction, un peu comme en php, qui permettrait de placer les mots d'une phrase dans un tableau qui donnerait ceci ?
 
x(1) = "le"
x(2) = "chien"
x(3) = "méchant"
 
Merci beaucoup


Message édité par erwan83 le 04-05-2006 à 19:37:03

---------------
http://www.ypikay.com
Reply

Marsh Posté le 04-05-2006 à 18:00:07   

Reply

Marsh Posté le 04-05-2006 à 18:16:29    

bonsoir,
Je te le fais en VBA je ne sais pas si ça marche en VB6

Code :
  1. Sub InitArray()
  2. Dim Tablo() As String 
  3. Tablo = Split("Lundi Mardi Mercredi Jeudi" )
  4. MsgBox Tablo(2)
  5. End Sub

A+


Message édité par galopin01 le 04-05-2006 à 18:19:00

---------------
roger
Reply

Marsh Posté le 04-05-2006 à 18:51:22    

Impossible d'affecter au tableau....
Marche pas...


---------------
http://www.ypikay.com
Reply

Marsh Posté le 04-05-2006 à 18:59:20    

mais merci quand même


---------------
http://www.ypikay.com
Reply

Marsh Posté le 04-05-2006 à 19:32:07    

C'est peut-être parce que j'utilise une syntaxe implicite propre à VBA.
Je suis quasiment certain que VB6 connait Split
peut-être suffit-il de déclarer le séparateur ("espace" )  
Qu.que chose comme ça :

Code :
  1. Sub InitArray()
  2. Dim Tablo() As String, chaine as String, i as Integer
  3. chaine = "Lundi Mardi Mercredi Jeudi"
  4. Tablo = Split(chaine," " )
  5. For i = 0 To UBound(Tablo)
  6. MsgBox Tablo(i)
  7. Next i
  8. End Sub


A+


Message édité par galopin01 le 04-05-2006 à 19:33:36

---------------
roger
Reply

Marsh Posté le 04-05-2006 à 19:36:39    

BINGO
Cet exemple marche...
effectivement, il lui faut un séparateur...
Merci


---------------
http://www.ypikay.com
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed