|
-
Sep 8th, 2007, 06:03 PM
#1
Thread Starter
Hyperactive Member
Strings question
Hi all, I have a question..
Lets say I have a String which is called (String1).
charlen = Len(String1)
and c2 = 250 (how many chars i want to show from the String1)
I want it that If String1 is bigger than 250 to show the final word as complete like this:
welcome to my website
NOT
welcome to my webs (where s is the 250 character)...
I used this but it didn't work with me
Code:
IF charlen > c2 Then
For i = c2 To charlen
IF Mid(String1, i, 1) = " " Then
c2 = i
EXIT For
End IF
NEXT
End IF
-
Sep 9th, 2007, 04:06 AM
#2
Re: Strings question
try this
vb Code:
IF charlen > c2 Then
For i = c2 To charlen
IF Mid(String1, i, 1) = " " And Len(Left(String1, i - 1) > charlen - 1 Then
string2 =left(string1, i - 1)
EXIT For
End IF
NEXT
End IF
i do my best to test code works before i post it, but sometimes am unable to do so for some reason, and usually say so if this is the case.
Note code snippets posted are just that and do not include error handling that is required in real world applications, but avoid On Error Resume Next
dim all variables as required as often i have done so elsewhere in my code but only posted the relevant part
come back and mark your original post as resolved if your problem is fixed
pete
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
|