Plockning klartext från mellan en viss uppsättning HTML-taggar är trivialt enkelt att med kraften i reguljära uttryck. Visual Basic 6 släpptes före . NET Framework så det inte har inbyggt stöd för reguljära uttryck som Visual Basic . NET , men det är fortfarande möjligt att använda reguljära uttryck i VB6 genom att referera den inbyggda VBScript Windows COM -objekt . När det är refererade , kommer du att kunna använda samma typ av reguljära uttryck som används i JavaScript
Du behöver : .
tillgång till Internet.
1 .
Klicka på ” Project ”, klicka sedan på ” Referenser ”i din VB6 redaktör .
2 .
Rulla ner Listan över tillgängliga bibliotek för att ” Microsoft VBScript Regular Expressions 5,5 . ” och markera rutan bredvid .
3 .
Kopiera följande kod till en subrutin . Det kommer att hitta texten mellan alla HTML -taggar och visa resultatet i en meddelanderuta :
Dim RegularExpressionObject som ny VBScript_RegExp_55. RegExp
Med RegularExpressionObject
mönster=”<(?' tag ". \ w +?). *>” + ” ( ? 'text ' . * ? ) ”+ ” \> ”
. ignoreCase=True
End With
Dim regExMatcher Som Match=Regex. Match ( ”
Vissa data mellan taggarna
” , RegularExpressionObject )
MessageBox. Show ( regExMatcher. Groups ( ” tag ” ) . Value )
tips och varningar
コメント