Extraer Desde Hasta

Lectura estimada: 1 minuto 144 views

				
					DESCRIPCION:

Extrae el texto de ValorOrigen desde el caracter de Condicion1Valor hasta el caracter de Condicion2Valor

EJEMPLO:

Extraer de este código genérico (88-1234Z) desde el caracter “-” hasta “4”

ValorOrigen: “88-1234Z”

Condicion1Valor: “-”

Condicion2Valor: “4”

ValorProcesado: “1234”

Tipo	Valor
Valor
Valor2
Relacion
Relacion2
Operacion	Extraer desde hasta
Factor

				
					If ValorOrigen <> “” Then

If Condicion1Valor <> “” Then

If Condicion2Valor <> “” Then

If IsNumeric(Condicion1Relacion) Then

Else

Condicion1Relacion = 0

End If

If IsNumeric(Condicion2Relacion) Then

Else

Condicion2Relacion = 0

End If

Dim Posicion1 As Integer = 0

Dim Posicion2 As Integer = 0

If Condicion1Valor = “Inicio” Then

Posicion1 = 0

Else

Posicion1 = ValorOrigen.IndexOf(Condicion1Valor)

End If

If Condicion2Valor = “Fin” Then

Posicion2 = ValorOrigen.Length

Else

Posicion2 = ValorOrigen.IndexOf(Condicion2Valor)

End If

Dim Total As Integer = ValorOrigen.Length

ValorProcesado = ValorOrigen.Substring(Posicion1 + Condicion1Relacion, Posicion2 – Posicion1 + Condicion2Relacion)

End If

End If

Conecta Software

Hola!

Extraer Desde Hasta

CONTENIDO