Picking platte tekst uit tussen een bepaalde set van HTML -tags is kinderlijk eenvoudig met de kracht van reguliere expressies . Visual Basic 6 werd vrijgegeven voor het . NET framework , zodat het geen native ondersteuning voor reguliere expressies , zoals Visual Basic hebben . NET , maar het is nog steeds mogelijk om reguliere expressies in VB6 te gebruiken door te verwijzen naar de ingebouwde VBScript Windows COM-object . Als het eenmaal is verwezen , zal je in staat zijn om dezelfde stijl van reguliere expressies gebruikt in de webbrowser te gebruiken . Instructies
1 Klik op " Project ", en klik op ' Referenties ' in je VB6 editor . Kopen van 2 Blader door de lijst met beschikbare bibliotheken om " Microsoft VBScript Regular Expressions 5.5 . " en vink het vakje ernaast .
3 Kopieer de volgende code in een subroutine . Het zal de tekst tussen een HTML -tags te vinden en het resultaat in een message box : Dim RegularExpressionObject als Nieuwe VBScript_RegExp_55.RegExpWith RegularExpressionObject.Pattern = " < ( ' tag ' \\ w + ? ) * . > " + " ( ? 'text ' . * ? ) "+ " < /\\ k'tag ' > ' . IgnoreCase = TrueEnd WithDim regExMatcher Zoals Match = Regex.Match ( " Sommige gegevens tussen labels < /h1 > " , RegularExpressionObject ) MessageBox.Show
( regExMatcher.Groups ( " tag " ) . Value ) op Twitter
|
