Voilà j'ai un textbox dans lequel une phrase et un listbox avec une liste
des mots.
Je voudrais selectionner juste un mot de la phrase (au milieu de la phrase)
du textbox puis double cliquer sur un mot dans la listbox pour remplacer le
mot selectionné dans la phrase par le mot de la listebox.
Je n'arrive pas à le faire. En fait quand je double clique sur list1 il me
remplace la phrase toute entière et non pas le mot selectionné uniquement.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
ng
Salut,
Regarde du coté de la propriété SelText et non Text de ton Textbox :
oTxtBox.SelText="nouveau text"
Et pour sélectionner un sous texte par programmation regarde du coté de SelStart et SelLength :
oTxtBox.SelStart = 2 oTxtBox.SelLength = 2
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/
Ingrid Bauer wrote:
Salut tout le monde,
Voilà j'ai un textbox dans lequel une phrase et un listbox avec une liste des mots.
Je voudrais selectionner juste un mot de la phrase (au milieu de la phrase) du textbox puis double cliquer sur un mot dans la listbox pour remplacer le mot selectionné dans la phrase par le mot de la listebox.
Je n'arrive pas à le faire. En fait quand je double clique sur list1 il me remplace la phrase toute entière et non pas le mot selectionné uniquement.
Merci d'avance.
Bisous Ingrid la néerlandaise
Salut,
Regarde du coté de la propriété SelText et non Text de ton Textbox :
oTxtBox.SelText="nouveau text"
Et pour sélectionner un sous texte par programmation regarde du coté de
SelStart et SelLength :
oTxtBox.SelStart = 2
oTxtBox.SelLength = 2
--
Nicolas G.
FAQ VB : http://faq.vb.free.fr
API Guide : http://www.allapi.net
Google Groups : http://groups.google.fr/
MZ-Tools : http://www.mztools.com/
Ingrid Bauer wrote:
Salut tout le monde,
Voilà j'ai un textbox dans lequel une phrase et un listbox avec une
liste des mots.
Je voudrais selectionner juste un mot de la phrase (au milieu de la
phrase) du textbox puis double cliquer sur un mot dans la listbox
pour remplacer le mot selectionné dans la phrase par le mot de la
listebox.
Je n'arrive pas à le faire. En fait quand je double clique sur list1
il me remplace la phrase toute entière et non pas le mot selectionné
uniquement.
Regarde du coté de la propriété SelText et non Text de ton Textbox :
oTxtBox.SelText="nouveau text"
Et pour sélectionner un sous texte par programmation regarde du coté de SelStart et SelLength :
oTxtBox.SelStart = 2 oTxtBox.SelLength = 2
-- Nicolas G. FAQ VB : http://faq.vb.free.fr API Guide : http://www.allapi.net Google Groups : http://groups.google.fr/ MZ-Tools : http://www.mztools.com/
Ingrid Bauer wrote:
Salut tout le monde,
Voilà j'ai un textbox dans lequel une phrase et un listbox avec une liste des mots.
Je voudrais selectionner juste un mot de la phrase (au milieu de la phrase) du textbox puis double cliquer sur un mot dans la listbox pour remplacer le mot selectionné dans la phrase par le mot de la listebox.
Je n'arrive pas à le faire. En fait quand je double clique sur list1 il me remplace la phrase toute entière et non pas le mot selectionné uniquement.
Merci d'avance.
Bisous Ingrid la néerlandaise
Barsalou
Essaye le code suivant :
Private Sub Form_Load() 'pour initialiser l'exemple Text1.Text = "Utinam aves super caput tuam cacent" List1.AddItem "homines" List1.AddItem "cives" List1.AddItem "canes" End Sub
Private Sub List1_Click() 'cliquer après avoir sélectionné un mot dans la textbox Text1.SelText = List1.Text End Sub
Amicalement
Essaye le code suivant :
Private Sub Form_Load()
'pour initialiser l'exemple
Text1.Text = "Utinam aves super caput tuam cacent"
List1.AddItem "homines"
List1.AddItem "cives"
List1.AddItem "canes"
End Sub
Private Sub List1_Click()
'cliquer après avoir sélectionné un mot dans la textbox
Text1.SelText = List1.Text
End Sub
Private Sub Form_Load() 'pour initialiser l'exemple Text1.Text = "Utinam aves super caput tuam cacent" List1.AddItem "homines" List1.AddItem "cives" List1.AddItem "canes" End Sub
Private Sub List1_Click() 'cliquer après avoir sélectionné un mot dans la textbox Text1.SelText = List1.Text End Sub
