Less Than Dot is a community of passionate IT professionals and enthusiasts dedicated to sharing technical knowledge, experience, and assistance. Inside you will find reference materials, interesting technical discussions, and expert tips and commentary. Once you register for an account you will have immediate access to the forums and all past articles and commentaries.
ASP.NET: Truncate a string to a set number of whole words
From Wiki
Summary: An example function to truncate a string to a set number of whole words
- Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
- Label1.Text = TruncateWithWholeWords("one two three four five six seven eight nine ten " _
- & "eleven twelve thirteen fourteen fifteen sixteen seventeen eighteen " _
- & "nineteen twenty twenty-one twenty-two twenty-three", 20)
- End Sub
- Private Function TruncateWithWholeWords(ByVal OriginalString As String, ByVal NumberOfWords As Integer) As String
- ' Declarations
- Dim strResult As New StringBuilder
- Dim strWords As String()
- ' Replace multiple spaces with single ones
- Do While (OriginalString.IndexOf(Space(2)) >= 0)
- OriginalString = OriginalString.Replace(Space(2), Space(1))
- Loop
- ' Split the string by a space
- strWords = OriginalString.Split(" ")
- ' If there aren't the required number of spaces, return the orignal string
- If strWords.GetUpperBound(0) < NumberOfWords Then
- Return OriginalString
- Else
- ' Otherwise, append each word to the new stringbuilder
- For i As Integer = 0 To NumberOfWords - 1
- strResult.Append(strWords(i) & " ")
- Next
- ' Return the required phrase
- Return strResult.ToString.Trim
- End If
- End Function
This Hack is part of the ASP.NET Hacks collection



LTD Social Sitings
Note: Watch for social icons on posts by your favorite authors to follow their postings on these and other social sites.