Jump to content
sabing

Converter String para Double

Recommended Posts

sabing

Olá eu estou com um problema eu estou fazendo um programinha de IATF para meu irmão, em casa mesmo porém estou com um problema na hora de converter String para Double, O problema começa assim, eu tenho o maps que é um api da google importado no meu projeto, eu preciso que o usuário procura um endereço no map para setar uma marcação, tentei de tudo fazer isso no api mais não consegui , o que fiz foi uma adaptação peguei o web browser do vb.net mesmo seto a url do google maps e pego as coordenadas na hora de inserir no api do map a posição ele me pede que seja double eu faço a conversão ele se perde o ponto ai não funciona eu passo manualmente as coordenadas funciona perfeitamente

código é esse ai

 urlConv = Me.WebBrowser1.Url.AbsoluteUri.ToString()
        If Not url = urlConv Then
            Me.WebBrowser1.Stop()
            Dim ConvertendoCoordenadas As String() = urlConv.Split("@")
            Dim coordenadas As String() = ConvertendoCoordenadas(1).Split(",")
            Dim logitude As String = coordenadas(0)
            Dim latitude As String = coordenadas(1)

'Na hora que converto eu perco o ponto
            'Dim convertLogitude As Double = Convert.ToDouble(logitude)
            'Dim convertLatitude As Double = Convert.ToDouble(latitude)
            With GMap

'Quando coloco aqui sem ponto não funciona
                '.Position = New GMap.NET.PointLatLng(logitude, latitude)
                .ZoomAndCenterMarkers(CType(vbNull, String))
                .Zoom = 100
                .ShowCenter = True
            End With
            GMap.Refresh()
        End If

'Tentei passar manualmente a string dentro desse parametro mais não funcionou

GMap.SetPositionByKeywords("USA")

'Esse parametro não funciona tive que fazer tudo isso para funcionar o que queria

 

Share this post


Link to post
Share on other sites
sabing

Já resolvi eu fiz assim o trecho

If Not url = urlConv Then
            Me.WebBrowser1.Stop()
            Dim ConvertendoCoordenadas As String() = urlConv.Split("@")
            Dim coordenadas As String() = ConvertendoCoordenadas(1).Split(",")
            Dim logitude As String = coordenadas(0)
            Dim latitude As String = coordenadas(1)
            With GMap

'Usei essa conversao e funcionou perfeito
                .Position = New GMap.NET.PointLatLng(Double.Parse(logitude, CultureInfo.InvariantCulture), Double.Parse(latitude, CultureInfo.InvariantCulture))
                .ZoomAndCenterMarkers(CType(vbNull, String))
                .Zoom = 100
                .ShowCenter = True
            End With
            GMap.Refresh()
        End If



'Se souberem usar a localização da propria api me avise que ficaria grato

GMap.SetPositionByKeywords("USA")

 

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.