[VB6] Da RichTextBox a ListBox come?

[optime]

andiamo per step.

1. split

Dim sArray() As String
sArray = Split(RichTextBox1, VbCrLf)

usa le tue variabili