'Multiline Textbox Contents to Listbox?
Q. My program has a multi-line textbox, a listbox, and a button. I want the contents of the textbox copied line by line to the listbox when the user clicks the button.
A. Use a Do-Loop to run through Text1.Text, locating the carriage return/line feeds (CrLf), and copying the text between them to the Listbox:
Dim sTmp As String, iPos1 As Integer, iPos2 As Integer sTmp = Text1.Text iPos1 = 1 iPos2 = InStr(sTmp, vbCrLf) Do While iPos2 List1.AddItem Mid$(sTmp, iPos1, iPos2 - iPos1) iPos1 = iPos2 + 1 iPos2 = InStr(iPos1, sTmp, vbCrLf) Loop Thanks to: Chris Schore, Bob Walsh
Downloads In IE right-click and select 'Save Target As...' or in Netscape
right-click and select 'Save Link As...' View Plain Text
Not Available
Not Available
|