Extraer caractareres

[keroveros]

Muy buenas!

Estoy intentando extraer una parte de cadena de una variable pero no encuentro la funcion, no se si existira en VB, creo que si.

Necesito hacer lo siguiente:

Tengo una variable con un nombre de archivo y quiero cambiarle la terminacion, yo he pensado el siguiente proceso:


cNomFich ="hoja.xls"
temp=(extraería la cadena "hoja" de cNomfich, no se como)
cNomfich2=temp+".doc"


Espero haberme explicado bien y que se pueda hacer

Salu2!

[tazzito]

para esos puedes hacerlo con el Instr que te devuelve la posicion de la cadena dentro de otra es algo asi

cadenaorigen = "Hoja.XLS"
CadenaABuscar=".XLS"
posicion=InsStr(1,CadenaOrigen, CadenaABuscar)
if posicion > 0 then
NombreFichero2 = mid(CadenaOrigen,1,len(CadenaOrigen)-Len(CadenaABuscar)) & ".DOC"
endif


aunque creo que para un efecto como el que deseas es mas facil
cNomFich2=replace(cNomFish,".XLS",".Doc")

u otra forma seria
cNomFish2 = left(cNomFish,Len(cNomFish)-4) & ".Doc"

[keroveros]

Muchas gracias!!

El replace era lo que yo necesitaba si señor, pero claro estoy acostumbrado a que las funciones de cadena lleven str (substr,strstr,instr)y no daba con ella, llevo 2 dias programando en VB, jejeje

Muchas gracias de verdad y Salu2!