Programación General > Visual Basic para principiantes

 Separar path de fichero sin instrrev

<< < (2/2)

J-Ant:
Efectivamente, F_Tanori, lo solventé recorriendo en orden inverso con un for, tal que asi
 
--- Código: Visual Basic --- for I= len(trim(cadena)) to 1 step -1    If Mid(Trim(cadena), I, 1) = "" then Exit ForNext IPath =Mid(cadena, 1, I-1)Archivo= Mid(cadena, I + 1)  

Gracias a todos por vuestra aportación.

m0skit0:
Eso probablemente sea mucho más lento que usar StrRev e InStr, pero vamos, tú mismo  :P

F_Tanori:
En esta pagina viene como 'simular ' esas funciones en una version de VB inferior a 6

http://support.microsoft.com/kb/188007/es

si no estan disponibles (Legacy)  ...

y como veras segun la recomendacion de MS ... StrReverse es un ciclo for en reversa  :whistling:

Saludos

m0skit0:
Como siempre no deja de asombrarme la cutrez de MS  :lol: Mira que usar Mid() y no hacerlo con código más rápido usando C/C++ por ejemplo.

F_Tanori:

--- Cita de: "m0skit0" ---Como siempre no deja de asombrarme la cutrez de MS  :lol: Mira que usar Mid() y no hacerlo con código más rápido usando C/C++ por ejemplo.
--- Fin de la cita ---

Claro, internamente yo supongo cuando las funciones estan incluidas en el lenguaje, como lo es en VB6 ya vienen en un codigo optimizado, mejor elaborado, y eficiente, pero estas funciones son simulaciones de las funciones que en una version anterior no estan disponibles, para que puedan estarlo.

Pero claro en lo que dices tienes razon pero esto es solo para solventar estas caracteristeicas pare este sistema heredado

Saludos

Navegación

[0] Índice de Mensajes

[*] Página Anterior