目前我设法使用以下代码获得方向度数:
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
to分配360
给它imageList
在pictureBox
. (目前我有 36 个不同箭头方向的指南针图像,每个代表10
度数)
当我的设备指向北方时,箭头图像显示正确的方向,但是当我旋转设备(指向非北方的任何地方)时,箭头图像没有改变,意味着它没有显示正确的方向方向了。
所以我的问题是,是否有可能知道 gps 设备指向哪个方向?
编辑:我正在使用Honeywell Dolphin 6000 Scanphone设备