Insérer du texte dans un textbox

phil - 28 févr. 2000 à 10:41
Claiyah Messages postés 580 Date d'inscription mercredi 20 août 2008 Statut Membre Dernière intervention 20 avril 2010 - 29 sept. 2009 à 15:06
Salut !

J'ai un textbox,
je suis a un endroit donne dans le contenu du textbox (exemple : en plein milieu).

Je clique sur un bouton et je veux qu'a l'endroit ou je me trouve dans le textbox, soit inséré automatiquement du texte (par exemple : "vous avez cliqué")

Exemple :

Contenu du textbox = azertyuiop
le curseur est entre le u et le i.
Je clique sur le bouton
> contenu du textbox =
azertyuvous avez cliquéiop

Merci d'avance !!!

4 réponses

C'est vraiment très simple :
soit une form contenant une textbox (Text1) dont le texte est "Bonjour Leroy" et un boutton (Command1) possèdant cet évènement :

Private Sub Command1_Click()
Text1.SetFocus
SendKeys " monsieur"
End Sub

Si l'on place le curseur sur Text1 après le mot "Bonjour" et on click sur Command1, le texte deviens "Bonjour monsieur Leroy".

Voilà, c'est tout

JCLK
0
cs_globule Messages postés 327 Date d'inscription mardi 8 octobre 2002 Statut Membre Dernière intervention 6 octobre 2010
25 nov. 2002 à 08:25
Ca ne marche pas sous XP, ca insere seulement les 3 premiers caracteres
0
cs_globule Messages postés 327 Date d'inscription mardi 8 octobre 2002 Statut Membre Dernière intervention 6 octobre 2010
25 nov. 2002 à 08:29
Non, j'ai dit une bétise, ca marche sous XP
0
Claiyah Messages postés 580 Date d'inscription mercredi 20 août 2008 Statut Membre Dernière intervention 20 avril 2010 3
29 sept. 2009 à 15:06
bonjour
utilise : seltext selstart sellengt
0
Rejoignez-nous