High-Tech
Santé-Médecine
Droit-Finances
CodeS-SourceS
Inscription
Plan
Connexion
Rechercher un code, un tuto, une réponse
Accueil
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Tous les langages
Delphi / Pascal
Java
Python
SQL
RegEx
Flash
ASM
IRC
Graphisme
PDA
ColdFusion
Foxpro
Flex
Visual Basic / VB.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
PHP
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C/C++/C++.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Javascript
Forum
Tutoriels
Codes Sources
Snippets
Top membres
C#/.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
ASP/ASP.NET
Forum
Tutoriels
Codes Sources
Snippets
Top membres
Accueil
Connexion
Déposer un code
Code
Recherche
Haut
Forum
Visual Basic
Visual Basic 6
Sujet Précédent
Sujet Suivant
Séparer du texte
Résolu
vbnino
Messages postés
218
Date d'inscription
jeudi 13 juillet 2006
Statut
Membre
Dernière intervention
11 juillet 2010
- 7 oct. 2007 à 20:05
cs_MPi
Messages postés
3877
Date d'inscription
mardi 19 mars 2002
Statut
Membre
Dernière intervention
17 août 2018
-
7 oct. 2007 à 20:23
Salut!
- Par exemple j'ai une textbox avec son texte "Salut!":
-Comment séparer les caractére et les lister dans une listbox à savoir:
list1.list(0)="S"
list1.list(0)="a"
list1.list(0)="l"
list1.list(0)="u"
list1.list(0)="t"
list1.list(0)="!"
-Merci
Afficher la suite
A voir également:
Séparation de texte
Zone de texte canva
✓
-
Forum Delphi / Pascal
Saisie de texte au kilometre
-
Forum Visual Basic
Générateur de texte cool
-
Forum VB.NET
Souligner texte illustrator
-
Forum Graphisme/design
Texte à compléter
✓
-
Forum VBA Office (Excel, Word ...)
1 réponse
Réponse 1 / 1
cs_MPi
Messages postés
3877
Date d'inscription
mardi 19 mars 2002
Statut
Membre
Dernière intervention
17 août 2018
23
7 oct. 2007 à 20:23
J'imagine que tu voulais écrire
list1.list(0)= "S"
list1.list( 1 ) ="a"
list1.list(
2
)= "l"
list1.list( 3 ) ="u"
list1.list(
4
)= "t"
list1.list( 5 ) ="!"
------------------------------------------------
Dim I As Integer, Chaine As String
Chaine = "Salut !"
For I = 1 To Len(Chaine)
If Mid(Chaine, I, 1) <> " " Then
List1.AddItem Mid(Chaine, I, 1)
End If
Next
MPi²
Votre réponse
Discussions similaires
coder un Tchat comme roulettechat.fr/chat/texte.php
samote152
-
8 juil. 2014 à 00:22
samote152
-
8 juil. 2014 à 12:53
Texte aléatoire
sebchr
-
16 avril 2004 à 16:33
rene38
-
3 avril 2005 à 19:36
Text Aleatoire
ideosphere
-
25 août 2003 à 15:13
BruNews
-
26 août 2003 à 14:43
Trait de séparation dans les menu ....
cs_azerty25
-
11 nov. 2003 à 08:15
azerty25
-
11 nov. 2003 à 14:34
souligner texte sous illustrator 10
cs_linsay
-
28 janv. 2004 à 17:29
linsay
-
6 févr. 2004 à 13:55
Rejoignez-nous