Escolher texto simples a partir de entre um determinado conjunto de tags HTML é trivialmente fácil com o poder das expressões regulares. Visual Basic 6 foi lançado antes da NET . Que ele não tem suporte nativo para expressões regulares , como o Visual Basic. NET , mas ainda é possível usar expressões regulares em VB6 referenciando o objeto construído em VBScript COM do Windows . Uma vez que é referenciado, você será capaz de usar o mesmo estilo de expressões regulares utilizados em JavaScript. Instruções
1
Clique em " Projeto " e clique em "Referências" em seu editor de VB6.
2
Role a lista de bibliotecas disponíveis para "Microsoft VBScript Regular Expressions 5.5 . " e marque a caixa ao lado dele.
3
Copie o código a seguir em uma sub-rotina . Ele vai encontrar o texto entre quaisquer tags HTML e exibir o resultado em uma caixa de mensagem : "< . ( ? ' Tag' \\ w +) * > " Dim RegularExpressionObject As New VBScript_RegExp_55.RegExpWith RegularExpressionObject.Pattern = + "(? 'texto' . *?) "+" < /\\ k'tag '> " . IgnoreCase = TrueEnd WithDim regExMatcher Como Jogo = Regex.Match ( "
Alguns dados entre as tags
" , RegularExpressionObject )
MessageBox.Show ( regExMatcher.Groups ( " tag " ). Valor )