[VB6]: Aggiungere elemento da RichTextBox a ListBox

[GhostFire]

voglio ke premendo un command ( intendo un pulsante ) addi dalla listbox al richtextbox come posso fare?

[EngLab]

Con questo

Private Sub Command_Click()
Text.Text = Lista.List(Lista.ListIndex)
End Sub

[GhostFire]

non funziona mi dice che manca un oggetto

[GhostFire]

scusate il doppio post ma nn mi faceva editare cmq ho risolto grz 1000 englab