Bonjour,
Pour ta première question pour insérer "Pomme" à la fin de ton texte, je te conseille d'utiliser le & qui permet dde concaténer les chaînes de caractère en faisant:
dim mot as char
mot = "manger"
textbox1.text=textbox1 & " " & mot
Remarque le caractère espace pour éviter d'avoir "Manger despommes".
Ta deuxième question pour supprimer d'une liste est d'utiliser la fonction Remove car tu connais la valeur à supprimer de ta liste par le clic (si ta deux listes et que tu veux position le curseur sur la deuxième au même niveau que l'autre (ex: coordonnées d'un point) en ayant cliquer sur le 1er):
Private
Sub List1_Click()
List2.ListIndex
= List1.ListIndex
End
Sub