I was trying several times, but nothing happend.
Here is one of my try:
Dim i As Long
Dim a() As String
a = Split(txNm.Text, vbCrLf)
For i = LBound(a) To UBound(a)
LbNm.AddItem a(i)
Next
What's happend - ListBox received focus - and that's All.
Could You write the code, please.
thanks.