Obter Data de Array

[Chamuanza]

Um Bem Aja a todos

Mais uma vez venho pedir ajuda

Encontrei  este código no Forum e queria sacar a data do sorteio que se encontra na linha (520) do array "leitor" mas não consigo.

Alguem me dá uma dica?

  Dim oWebRequest As WebRequest
        Dim oWebResponse As WebResponse = Nothing
        Dim strBuffer As String = ""
        Dim objSR As StreamReader = Nothing
        Dim leitor As Object
        Dim ler As Boolean = False
        Dim valores As String = String.Empty
        Dim i As Integer = 0

        Dim num_final As String = String.Empty
        Dim estrela_final As String = String.Empty

        'conecta com o website
        Try
            oWebRequest = HttpWebRequest.Create("https://www.jogossantacasa.pt/web/SCCartazResult/euroMilhoes")
            oWebResponse = oWebRequest.GetResponse()
            'Le a resposta do web site e armazena em uma stream
            objSR = New StreamReader(oWebResponse.GetResponseStream)
            strBuffer = objSR.ReadToEnd
            leitor = Split(strBuffer, vbNewLine)

            For Each linha In leitor
                If ler = True Then
                    valores += linha.ToString + vbNewLine
                    i += 1
                End If

                'If linha.Contains("Ordem Saída:") Then
                '    ler = True
                'End If

                If linha.Contains("Chave:") Then
                    ler = True
                End If

                If i > 8 Then
                    ler = False
                End If
            Next

        Catch ex As Exception
            MsgBox(ex.ToString)
        Finally
            objSR.Close()
            oWebResponse.Close()
        End Try

Depois tentarei colocar o resultado na msgbox

Obrigado desde já pela atenção

[Andrepereira9]

Boas

If linha.Contains("Data do sorteio:") Then
     MsgBox(linha.ToString)
End If

[Chamuanza]

Oi Andre

Obrigado pela atenção

O resultado da mensagem é:

<td class="TDcinza2" width="289" height="25" valign="middle" align="center"> Data do sorteio: 16/03/2012</td>"

como passo o valor da data para uma variavel ?