This works if you can get your text into a variable.
VB Code:
  1. Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
  2.         Dim TheSentence As String
  3.         TheSentence = "The red rabbit ran round the ragged rock2"
  4.         Dim Word1 As String
  5.         Dim Word2 As String
  6.         Dim Word3 As String
  7.        
  8.  
  9.         Dim strLen As Integer = Len(TheSentence)
  10.         TheSentence.IndexOf(" ")
  11.         Word1 = Left(TheSentence, TheSentence.IndexOf(" "))
  12.         Label1.Text = Word1
  13.         TheSentence = TheSentence.Remove(0, TheSentence.IndexOf(" "))
  14.         TheSentence = LTrim(TheSentence)
  15.         Word2 = Left(TheSentence, TheSentence.IndexOf(" "))
  16.         Label2.Text = Word2
  17.         TheSentence = TheSentence.Remove(0, TheSentence.IndexOf(" "))
  18.         TheSentence = LTrim(TheSentence)
  19.         Word3 = Left(TheSentence, TheSentence.IndexOf(" "))
  20.         Label3.Text = Word3
  21.         TheSentence = TheSentence.Remove(0, TheSentence.IndexOf(" "))
  22.         TheSentence = LTrim(TheSentence)
  23.         Label4.Text = Word1 & Word2 & Word3
  24.  
  25.  
  26.  
  27.     End Sub
You could even use a loop to replace repeating someof the code