Facilmente Conviertes el texto del Textbox a un Char Array y lo recorres con un For . 1) El textbox solo tendrá números de 2 dígitos? , si contiene mas de 2 dijitos entoces le metes un IF comprobando el ARRAY.COUNT.
te pongo un Ejemplo : Dim NumerodeIzquierda As String = String.Empty
Dim NumerodeDerecha As String = String.Empty
'Obtenemos Texto
Dim Numeros As String = TextBox1.Text
'Convertimos en un Array
Dim TextArray() As Char = Numeros.ToArray
Dim Check As Integer = 0
' Recorremos.
For Each Numero As Char In TextArray
If TextArray.Count = 2 Then
If Check = 0 Then
NumerodeIzquierda = Numero.ToString
Check = 1
ElseIf Check = 1 Then
NumerodeDerecha = Numero.ToString
Check = 2
End If
End If
Next
Bueno esto seria un solución rapida, como especificaste Te separa los dos números . Ej : Con el numero 32 te deja ;
NumerodeIzquierda = 3
NumerodeDerecha = 2
Recuerda que esto es en caso de que el numero sea solo de 2 dígitos, bueno aunque si modificas un toke lo ajustas a tus necesidades.
Mi Forma de Hacer Fácilmente lo que pides seria esta: Dim Numeros As String = TextBox1.Text ' Obtenemos Texto del textbox en este caso seria 32
msgbox(Numeros(0)) ' Asi obtienes el Primer numero, en este caso es el 3
msgbox(Numeros(1)) ' Asi obtienes el Segundo numero, en este caso es el 2
en este caso es casi lo mismo que te puso el Compañero
@EdePC . la diferencia es que ahi el esta tomando el numero en modo de rango
(yo lo usaria para una gran cantidad de digitos ) :
txtDer.Text = txtNum.Text.Substring(1, 1)
txtIzq.Text = txtNum.Text.Substring(0, 1)
Para aplicarlo a tan solo 2 dígitos solo tomo el numero por posición como te mostré anteriormente.
No mames
@EdePC , Ahora le entras a vb.net .
Mostrar Mensajes
" 
, Cristiano y pide tal astronómica cifra? , yo creo que solo quiere dinero. 
.