You might want to look at the
IsNumeric function[
^]. It would be one method of accomplishing your goal, but I'm not sure how efficient it is.
---Updated solution:
I was thinking you would use it sort of like this:
Dim lstNumbersAndLetters As New List(Of String)
Dim lstFinalOutput As New List(Of String)
For Each strItem As String In lstNumbersAndLetters
If IsNumeric(strItem) Then
lstFinalOutput.Add(strItem)
Else
lstFinalOutput.Item(lstFinalOutput.Count - 1) = lstFinalOutput.Last & " " & strItem
End If
Next
You could also look into using
regular expressions[
^] somehow.