ne pas faire apparaitre ses 2 trait à la fin de l'item.Résolu

Question

bonsoir
Jack ma donn&#233; la solution pour faire un glisser d'une Listbox vers un Textbox,&#231;a fonctionne parfaitement.
http://vbfrance.com/forum.v2.aspx?ID=627542
Mais quand je glisse mon item vers le textbox il y &#224; 2 trait qui se mettent &#224; la fin de l'item,donc je ne peut supprimer cet item car il ne le trouve pas dans mon fichier.
Comment faire pour ne pas faire apparaitre ses 2 trait &#224; la fin de l'item.
merci
@ plus
petchy

Gobillot · Accepted Answer

1) Double Click pas vraiment

    1 Click pour s&#233;lectionner (ou plusieurs si MultiS&#233;lection)

    1 Click pour glisser





2) Comment faire pour ne pas faire apparaitre ses 2 traits

    c'est bien le vbCrLf

    ou alors faut pas les mettre

    mais si la ListBox est en MultiSelect, il y en aura entre chaque item



3) il n'y &#224; rien qui s'affiche.

    alors l&#224; impossible

    le curseur est-il bien en forme de fl&#232;che avec un plus,

    donc il y a bien quelque chose


Daniel

Gobillot · Answer

&#231;a doit &#234;tre le vbCrLf

ton TextBox n'est pas en Multiligne.

Daniel

cs_petchy · Answer

Salut Daniel
quand je met TextBox en Multiligne il n'y &#224; rien qui s'affiche.
petchy

Gobillot · Answer

Bonsoir,



1) Le ListBox est-il en MultiSelect

2) tu veux mettre le Texte o&#249; dans le TextBox

3) &#224; toi de voir s'il faut mettre le vbCrLf en rouge





Private Sub List1_OLEStartDrag(Data As DataObject, AllowedEffects As Long)

'  rien ici

End Sub


Private Sub Text1_OLEDragDrop(Data As DataObject, Effect As Long, Button As Integer, Shift As Integer, X As Single, Y As Single)

    

'   &#224; la fin du TextBox

'   Text1 = Text1 & Data.GetData(vbCFText) & vbCrLf

    

'   ou &#224; la position du curseur

    Text1.SelText = Data.GetData(vbCFText) & vbCrLf

    

End Sub


Daniel

cs_petchy · Answer

Merci Daniel
j'ai supprimer vbCrLf  dans le code de la Listbox,et pour le double click c'est bon.


merci &#224; toi
bonne soir&#233;e
petchy

Ne pas faire apparaitre ses 2 trait à la fin de l'item.

5 réponses

Discussions similaires