ChopLastWord Function
page 3 of 3
by Topher Jentoft
Feedback
Average Rating: This article has not yet been rated.
Views (Total / Last 10 Days): 18776/ 32
Article Contents:

Alternative Code

Of course, there is always more than one way to skin a cat, especially when it comes to programming. Here's what Michael Brinkley had to offer that does the same thing with a lot less work:

Function truncLine(inputString,maxlength)
    If len(inputString) > maxlength Then
  inputString = left(inputString,maxlength)
  inputString = left(inputString,inStrRev(inputString," "))
    End If
    truncLine = inputString
End Function
 

View Entire Article

User Comments

Title: ASP.NET Version   
Name: Martin Jansen
Date: 2009-02-03 9:10:56 AM
Comment:
I've created a .NET Version of the function (Both VB.NET as C#)

VB.NET:

Function truncLine(ByVal inputString As String, ByVal maxlength As Integer) As String
If inputString.Length > maxlength Then
inputString = inputString.Substring(0, maxlength)
inputString = inputString.Substring(0, inputString.LastIndexOf(" "))
End If
truncLine = inputString
End Function

C#

public string truncLine(string inputString, int maxlength)
{
if (inputString.Length > maxlength) {
inputString = inputString.Substring(0, maxlength);
inputString = inputString.Substring(0, inputString.LastIndexOf(" "));
}
return inputString;
}
Title: ASP.NET Version   
Name: Martin Jansen
Date: 2009-02-03 9:08:40 AM
Comment:
I've created a .NET Version of the function (Both VB.NET as C#)

VB.NET:

Function truncLine(ByVal inputString As String, ByVal maxlength As Integer) As String
If inputString.Length > maxlength Then
inputString = inputString.Substring(0, maxlength)
inputString = inputString.Substring(0, inputString.LastIndexOf(" ")) & "..."
End If
truncLine = inputString
End Function
Title: Bothe Great Solutions   
Name: David Johndrow
Date: 2007-02-02 12:15:59 PM
Comment:
Thanks, very fast and easy to implement.
Title: satish   
Name: satish
Date: 2005-05-21 2:29:04 AM
Comment:
thank you
Title: ChopLastWord Function   
Name: ChopLastWord Function
Date: 2004-07-09 7:32:41 PM
Comment:
Thank you so much for this!

Product Spotlight
Product Spotlight 





Community Advice: ASP | SQL | XML | Regular Expressions | Windows


©Copyright 1998-2024 ASPAlliance.com  |  Page Processed at 2024-03-29 5:39:29 AM  AspAlliance Recent Articles RSS Feed
About ASPAlliance | Newsgroups | Advertise | Authors | Email Lists | Feedback | Link To Us | Privacy | Search