Cotação do dolar.

using system.net;

using system.io;

...

private void dorequest()

{

   //cria uma requisição para a url

   webrequest rq = webrequest.create(

    "http://br.invertia.com/mercados/divisas");

   //obtém a resposta

   httpwebresponse rp = 

    (httpwebresponse)rq.getresponse();

   //obtém um stream contendo a resposta

   //retornada pelo servidor

   stream ds = rp.getresponsestream();

   //cria um streamreader para leitura

   streamreader rd = new streamreader(ds);

   //lê o conteúdo

   string ct = rd.readtoend();

   //atribui o resultado ao textbox

   tbresponse.text = ct;

   //fecha os objetos

   rd.close();

   ds.close();

   rp.close();

   //exibe o resultado

   lbresultado.text = "r$ " + extractdolar(ct);

}

private string extractdolar(string text)

{ 

   //procura por indexador fixo

   int i = text.lastindexof("dolcm");

   //incrementa deslocamento

   i += 16;

   //captura o texto

   return text.substring(i, 6);

}

 Private Function extractdolar(ByVal text As String) As String

        Dim i As Integer = text.LastIndexOf("DOLCM")
        i += 33

        Return text.Substring(i, 6)
    End Function