文件名称:利用vb6.0处理GPS数据
文件大小:282KB
文件格式:PDF
更新时间:2017-05-02 14:41:00
vb6.0 GPS
Dim Pts As New Mapobjects2. Points'导航点 Dim Pt As Mapobjects2. Point If EdgeFiag = True Then If Id = l Then FstX = Mapl. Width / 5 FstY = Mapl. Height / 5 FstX0 = X FstY0 = Y Set Pt = Mapl. ToMapPoint(Mapl. Width / 5,Mapl. Height