В настоящее время мне удается получить степени направления, используя приведенный ниже код:
d = Math.Atan2(Math.Sin(long2 - long1) * Math.Cos(lat2), _
Math.Cos(lat1) * Math.Sin(lat2) - Math.Sin(lat1) * Math.Cos(lat2) * Math.Cos(long2 - long1))
Dim direction As Double = (RadToDeg(d) + 360.0) Mod 360
что, в моем случае, скажем, я получил 250.65°
Я назначаю каждое из значений direction
от 0
до 360
своему конкретному изображению из imageList
, которое загружается в файл pictureBox
. (в настоящее время у меня есть 36 изображений компаса с разным направлением стрелки, каждое из которых представляет 10
градусов)
Когда мое устройство направлено на север, изображение стрелки показывает правильное направление, но когда я поворачиваю устройство (указывающее в любом месте, кроме севера), изображение стрелки не меняется, означает, что он больше не показывает правильное направление.
Итак, мой вопрос: можно ли узнать, в каком направлении указано устройство GPS?
Изменить: я использую сканфон Honeywell Dolphin 6000