multi line testing

[greythej]

I have an application where the user types text into a multiline text box and it is added to a list box.

One major problem is that if the user types more than can fit in the list box, the text just continues off the end of the list box.

Is there a way i can write each line of the text box to a seperate line in the list box??

Cheers

GTJ

[Hack]

May I ask the purpose for writing the text to a listbox?

[greythej]

to show history of what they have typed..... but can you help with the problem???

[Pasvorto]

Why not just add a scroll bar to the list box?

[greythej]

you can't add a horizontal scrollbar?? it also looks neater to have a new line per new line in the text box...

[Pasvorto]

You could add the line to the list box each time the user enters a carriage return (vbcrlf) and clear the text box for the next line.

[greythej]

yes, but a text box automatically starts a new line when the user reaches the right side??

[Pradeep1210]

Private Sub Command1_Click()
    Dim nLimit As Long, s As String
    nLimit = 50     '<-- change this as per the width of your listbox
    s = Text1.Text
    Do While s <> ""
        List1.AddItem Left(s, nLimit)
        s = Mid(s, nLimit + 1)
    Loop
End Sub

[Pradeep1210]

You could add the line to the list box each time the user enters a carriage return (vbcrlf) and clear the text box for the next line.

What if the user never presses Enter key but types a very long sentence? (assuming only vertical scroll bar is enabled)

[dglienna]

You could use the .ToolTipText to display the field when they click on a listitem.

[Pasvorto]

Add each keystoke to the listbox as it as typed into the text box...

[greythej]

how would that help my problem?? the keys would still be entered off the edge of the list box...

[Pasvorto]

I like the earlier thought. Store the keystrokes in a variable until they meet your line limit. Then add them to the listbox and clear the variable to receive new data.

[greythej]

ok cool i will try Pradeep1210's method