|
-
October 29th, 2010, 12:56 AM
#3
Re: split long text ? help please
See if this helps:
Code:
Option Explicit
Private Sub Form_Load()
Dim a$, x%
a = "This is a test."
x = InStr(a, " ")
If x > 0 Then
Do While InStr(a, " ")
a = Replace(a, " ", " ")
Loop
End If
MsgBox a
End Sub
EDIT: Or, use a RichTextBox, and turn WORDWRAP on!
Last edited by dglienna; October 29th, 2010 at 01:10 AM.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|