Here are two extension methods that can convert a string (delimited by anything of your choosing) into an array of integers. Successfully handles any non-Integer data smoothly as well.

Public Module TypeExtensions

    <Extension()> _
    Public Function ToArrayOfInts(ByVal str() As String) As IEnumerable(Of Integer)
        Dim intRef As Integer
        Return str _
        .Where(Function(s) Not String.IsNullOrEmpty(s) AndAlso Integer.TryParse(s, intRef)) _
        .Select(Function(s) Integer.Parse(s))
    End Function
    
    <Extension()> _
    Public Function ToArrayOfInts(ByVal str As String, ByVal delimeter As String) As IEnumerable(Of Integer)
        Return str.Split(delimeter).ToArrayOfInts()
    End Function

End Module

You can use it like this:

foo.Text = "093,s,44g,sj38,87,6".ToArrayOfInts(",").Count().ToString()