Visual Basic - OK, va una cadena de ejemplo

"Vencimiento del recibo 21-12-2002, segun calculos...."

Entonces, como hago para obtener la fecha de aki ?

dim sCadena = "Vencimiento del recibo 21-12-2002, segun calculos...."
dim sFecha as string

a ver siempre llegara en esa forma ? o llega de distintas formas si es asi puedes usar esto

sFecha = Cstr(Split(sCadena," ")(3)) ' y sFecha sera = "21-12-2002"

eso es si solo llega de esa forma pero si cambia de lugar no te servira y necesitas otro codigo

maCo

Perdona Maco gràcias, pero que hace exactamente la funcion SPLIT ?

La funcion Split divide una Cadena y la transforma en un Array (Arreglo)
la divide en el caracter o caracteres que le pidas.
En el caso anterior le pedimos que divida la cadena en cada espacio (" ").
y como la dividio en cada espacio devuelve un array, y solo usas el index del array para agarrar la parte que desees.

maCo