[VB6] Copiare elementi di una ListBox in una Textbox

[yyzyyz]

Originariamente inviato da akus
Salve a tutti,vi pongo il mio problema:

Ho un Form con una Listbox un CommandButton ed una Textbox
dovrei tramite la pressione del CommandButton copiare la scelta evidenziata in ListBox nella TextBox...

attendo vostre notizie su come fare.

ciao, sulle proprietà del text1 metti:
Text1.MultiLine = True
Text1.ScrollBars = 2

nel CommandButton :

Private Sub Command1_Click()
Text1.Text = Text1.Text & vbCr & vbLf & List1.Text
len_text1 = Len(Text1.Text)
Text1.SelStart = Val(len_text1)
End Sub