Picking texto de entre un conjunto de etiquetas HTML es trivialmente fácil con el poder de las expresiones regulares. Visual Basic 6 fue lanzado antes del . NET Framework por lo que no tiene soporte nativo para las expresiones regulares como Visual Basic . NET , pero aún así es posible usar expresiones regulares en VB6 haciendo referencia a la construida en VBScript Ventanas objeto COM . Una vez que se hace referencia , usted será capaz de utilizar el mismo estilo de las expresiones regulares utilizadas en JavaScript . Instrucciones
1
Haga clic en " Proyecto ", luego haga clic en "Referencias " en el editor de Visual Basic 6 .
2 Desplácese por la lista de bibliotecas disponibles para " Microsoft VBScript Expresiones regulares 5.5 . " y marque la casilla que aparece junto a ella.
3
Copie el código siguiente en un subprograma. Encontrará el texto entre las etiquetas HTML y mostrar el resultado en un cuadro de mensaje : RegularExpressionObject Dim As New VBScript_RegExp_55.RegExpWith RegularExpressionObject.Pattern = " <( 'tag ' \\ w + ? ) * . > " + "(? 'texto' . * ? ) "+ " < /\\ k'tag " >". IgnoreCase = TrueEnd WithDim regExMatcher Como Partido = Regex.Match ( "
Algunos datos entre las etiquetas < /h1 >", RegularExpressionObject )
MessageBox.Show ( regExMatcher.Groups ( "tag ") . Valor )