Ajuda com geoCoordinateWatcher

Question

Boa noite,

Achei um site ensinando a utilizar o geoCoordinateWatcher para capturar coordenadas de sua localização, eu pretendo aplicar isso em um computador com sinal GPS mas ao testar o exemplo precisei ativar o DesiredAccuracy para conseguir maior precisão, e ele esta me retornando o erro "A Propriedade DesiredAccuracy é ReadOnly".

O código de exemplo é esse

Imports System.Device
Public Class FormGPS


    Private _geoCoordinateWatcher As New System.Device.Location.GeoCoordinateWatcher(System.Device.Location.GeoPositionAccuracy.High)
    Public Sub New()
        InitializeComponent()
        AddHandler _geoCoordinateWatcher.StatusChanged, AddressOf GeoCoordinateWatcher_StatusChanged
        _geoCoordinateWatcher.DesiredAccuracy = System.Device.Location.GeoPositionAccuracy.High

        _geoCoordinateWatcher.Start()
    End Sub

    Private Sub GeoCoordinateWatcher_StatusChanged(sender As Object, e As System.Device.Location.GeoPositionStatusChangedEventArgs)
        If lerCoordenadasButton.InvokeRequired Then
            lerCoordenadasButton.Invoke(New Action(Function() InlineAssignHelper(lerCoordenadasButton.Enabled, e.Status = System.Device.Location.GeoPositionStatus.Ready)))
        Else
            lerCoordenadasButton.Enabled = e.Status = System.Device.Location.GeoPositionStatus.Ready
        End If
    End Sub

    Private Sub lerCoordenadasButton_Click(sender As Object, e As EventArgs) Handles lerCoordenadasButton.Click
        If _geoCoordinateWatcher.Status = System.Device.Location.GeoPositionStatus.Ready Then
            latitudeTextBox.Text = _geoCoordinateWatcher.Position.Location.Latitude.ToString()
            longitudeTextBox.Text = _geoCoordinateWatcher.Position.Location.Longitude.ToString()
        End If
    End Sub
    Private Shared Function InlineAssignHelper(Of T)(ByRef target As T, ByVal value As T) As T
        target = value
        Return value
    End Function
End Class

Grato pela ajuda

Answer 1

Boa tarde Shiirohige,

Obrigado pela participação no Fórum MSDN.

Por gentileza, tente adaptar para sua necessidade o exemplo fornecido aqui.

Atenciosamente,

---

Robson William Silva

Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita

MSDN Community Support

Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.

Answer 2

já tentei utilizar mas não funcionou, grato pela ajuda.

Answer 3

Bom dia Shiirohige,

Você pode usar o DesiredAccuracy passando para o construtor.

Public Sub New (
        desiredAccuracy As GeoPositionAccuracy
)

Atenciosamente,

---

Robson William Silva

Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita

MSDN Community Support

Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.

Answer 4

Bom dia,

Devido a falta de resposta do usuário

essa thread está sendo fechada.

Se o problema ainda estiver ocorrendo,

favor abrir uma nova thread.

Atenciosamente,

---

Robson William Silva

Esse conteúdo é fornecido sem garantias de qualquer tipo, seja expressa ou implícita

MSDN Community Support

Por favor, lembre-se de Marcar como Resposta as postagens que resolveram o seu problema. Essa é uma maneira comum de reconhecer aqueles que o ajudaram e fazer com que seja mais fácil para os outros visitantes encontrarem a resolução mais tarde.