• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

Julia

Retirar Conteudo de uma Variavel

17 mensagens neste tópico

Boa Tarde, eu sou a julia e sou estudante de uma turma de programação.

A minha duvida é a seguinte:

Eu tenho uma variavel com este valor:"1&Euro=1,2768" e o valor vai mudando todos os dias. Já sei como metelo a actualizar porq tive aqui a ver uns posts.

Agora é o seguinte, eu preciso de fazer um conversor, logo vou precisar de ficar apenas com o valor 1,2768 numa variavel para poder fazer a conta.

Alguem me pode ajudar?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Estou no bloco de notas mas tenta:

Dim intTemp as Integer

dim valEuro as Double

intTemp = variavelQueTens.IndexOf("&Euro=")

valEuro = cdbl(variavelQueTens.Substring(intTemp + 5))

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Converte para double um objecto :)

Uma alteraçao no codigo que dei:

Dim intTemp as Integer

dim valEuro as Double

intTemp = variavelQueTens.IndexOf("&Euro=")

valEuro = cdbl(variavelQueTens.Substring(intTemp + 6))

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

"A conversão da cadeia "ro; = 1.2786 " para o tipo 'Double' não é válida."

Deve ter valores a mais né?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Dim intTemp as Integer

dim valEuro as Double

intTemp = variavelQueTens.IndexOf("=")

valEuro = cdbl(variavelQueTens.Substring(intTemp + 1))

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Eu tinha feito em vez de ter mudado o indexOf aumenti o nr... meti +12. Deu, mas o . vai-se embora... preciso do ponto! devo de ter que converter pa Long nao double. Digo eu!

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Só uma sugestão para ser mais à .NET e não utilizando as funções antigas, substituis o CDbl() por Double.Parse()

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

eu preciso de ficar com o . :S  :-[

Então não é uma valor ? Só tens de alterar o formato de visualização utilizando FormatCurrency()

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Isto testei com o exemplo que deste e funcionou:

Dim strTexto As String

        Dim dblValue As Double

        strTexto = "1&Euro=1,2768"

        strTexto = strTexto.Substring(strTexto.IndexOf("=") + 1)

        dblValue = Double.Parse(strTexto)

Agora retiras e o strTexto ne :)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

tão, mas ai já tou a dizer que strTexto vai ser igual 1&Euro=1,2768 e nao pode... tenho de ir tira-lo no texto, prq tá sempre a actualizar!

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

 
      Dim strTaxaEuro As String
        Dim intTemp As Integer
        Dim regex As New Regex("\s{2,}")
        var_semTAGS = regex.Replace(var_semTAGS.Trim(), " ")
        intTemp = var_semTAGS.IndexOf("1 €")
        strTaxaEuro = var_semTAGS.Substring(intTemp)
        strTaxaEuro = strTaxaEuro.Substring(0, strTaxaEuro.IndexOf("USD"))


        Dim dblvalue As Double
        Dim strTexto As String
        strTexto = strTaxaEuro
        strTexto = strTexto.Substring(strTexto.IndexOf("=") + 1)
        dblvalue = Double.Parse(strTexto)

        TextBox2.Text = dblvalue


    End Sub
End Class

Nao me devolve o valor com a , ou o . wtv!

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Resolvido, tinha de fazer replace do . pela ,!

        Dim strTexto As String
        Dim dblvalue As Double
        strTexto = strTaxaEuro
        strTexto = strTexto.Substring(strTexto.IndexOf("=") + 1)
        strTexto = strTexto.Replace(".", ",")
        dblvalue = Double.Parse(strTexto)
        TextBox2.Text = dblvalue

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

lol eu tinha deixado a nota a dizer que o strTexto teria de ser retirado para por a variavel com o valor :)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora