[Ayuda] Expresion Regular...

[Avellaneda]

Iniciado por Vicento

Señores!

Una duda.. he visto sobre las expresiones regulares en VB pero no entendi muy bien...

mi poregunta es.....
con una expresion regular como puedo hacer esto....

en el texto esta esto "<h1>hola</h1>"

como puedo hacer que soolo extraiga "hola" y lo guarde en alguna variable o algo asi??


espero su ayuda !!

saludois!
Vicento

Mira, para sacar el valor de una cadena entre dos carácteres, lo puedes hacer con una función como esta:

Código:

Function BuscarPalabra(ByVal Texto As String, ByVal CarIni As String, ByVal CarFin As String) As String
Dim PosIni As Integer, PosFin As Integer
PosIni = InStr(1, Texto, CarIni)
PosFin = InStr(PosIni + 1, Texto, CarFin)
PosIni = PosIni + Len(CarIni)
BuscarPalabra = Mid(Texto, PosIni, PosFin - PosIni)
End Function

Para llamar a la función (en tu caso):

Código:

Private Sub Command1_Click()
Dim Palabra As String
Palabra = BuscarPalabra(Text1.Text, ">", "<")
MsgBox Palabra  ' devuelve "hola"
End Sub