Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Spustenie projektu jazyka Visual Basic , v ktorom budete výpočet azimutu .
2
Definujte X ( šírka ) a Y ( dĺžka ) koordinuje pre dva body si chcete použiť pre výpočet azimutu . Napríklad :
Public Function azimut ( LAT1 , lon1 , lat2 , lon2 ) ako Double
Xcord = ( lon2 - lon1 ) ako dvojité
Ycord = ( lat2 - LAT1 ) ako dvojité
3
Pomocou matematické funkcie ATAN pre výpočet azimutu , takto . Výpočet bude mať za následok rád jednotkách .
Azimut = ATAN ( Xcord /Ycord )
4
Vytvoriť explicitné funkcie pomocou " rad2deg " a " CDbl " funkcie pre prevod výsledku z rád jednotiek stupňov , pretože azimut sa meria v stupňoch . Napríklad :
Funkcia rad2deg ( rád )
rad2deg = CDbl ( rad * 180 /pi )
End Function