Obtener una parte de un cadena en vb.net

[Aquaventus]

Igualmente CarmenRocio para mi es un placer ayudarte. Cuidate mucho amiga, aqui te dejo la solucion mediante recorrido en el evento Click del boton:

Código vb:

Dim contador As Int32 = 0
 
        For Each caracter As String In TextBox1.Text.ToCharArray
 
            If caracter.Equals(".") Then
                contador = contador + 2
                Exit For
            End If
            contador += 1
        Next
 
        TextBox2.Text = TextBox1.Text.Remove(contador, ((TextBox1.Text.Length - 1) - contador))