Discussion :

[minola]

Bonjour
j'ai une bouton copier,une bouton coller et 3 textBoxs (Text1, Text2 et Text3)
je voudrais selectionner une partie de mon texte Text1, appuyer sur le bouton copier(le code de bouton copier est réalisé) puis mettre le curseur dans l'une de deux TextBox (soit Text2 ou text3) et appuyer sur le bouton coller et que tout fonctionne comme si j'avais appuyer sur CTRL C puis CTRL V.
Et voila. Merci de votre aide.

[ucfoutu]

Bonjour,

Le menu contextuel des textboxes ne te suffit pas ? Tu veux faire le tien ?

Bon...

Penche-toi (dans ton aide en ligne) :

- sur les mots Selstart et SelLength
- sur l'objet ClipBoard, ses méthodes et ses propriétés.

Reviens vers nous si ce que tu trouves dans l'aide en ligne à ce propos ne résoud pas cxe petit problème


EDIT =================================================
Allez :
Bien que je ne comprenne pas cette idée de ne pas tout simplement se servir du menu contextuel des textbox (bouton droit de la souris sur sélection)...

Regarde ce que fait par exemple ceci :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Form_Activate()
  Text1.Text = "bonjour à tous les amis"
  Text2.Text = "salut les copains"
End Sub
 
Private Sub Command1_Click()
 Text1.SelStart = 8
 Text1.SelLength = 7
 Clipboard.SetText Text1.SelText
End Sub
 
Private Sub Command2_Click()
  Text2.SetFocus
  Text2.Text = Left(Text2.Text, 6) & Clipboard.GetText & Mid(Text2.Text, 7)
End Sub