Visual Basic oder VB ist ein Microsoft -Programmiersprache , die häufig verwendet wird fordeveloping professionelle geschäftliche und persönliche Anwendungen . Es bietet dem Anwender mit einer Reihe von Kontrollen , Objekte und Eigenschaften , um Code und neue Arbeitsfortschritt über eine intuitive grafische Benutzeroberfläche. VB kann Ihnen helfen, führen einfache , vorab Operationen , wie die Berechnung von Azimut, mit Hilfe eingebauter mathematische Funktionen . Azimut ist eine Winkelmessung verwendet, um die Position von Objekten an der Sphäre zu bestimmen. Es ist allgemein gemessen ausgehend von der N Angelpunkt und stellt den Winkel der Abstand zwischen zwei entfernten Punkten auf einer horizontalen Ebene . Anleitung
1

Starten Sie den Visual Basic-Projekt , in dem Sie Azimut berechnen wird .
2

Definieren Sie die X ( Breite ) und Y ( Längengrad) Koordinaten für die beiden Punkte, die Sie verwenden möchten, um Azimut berechnen. Zum Beispiel:

Public Function Azimuth ( lat1 , LON1 , LAT2 , LON2 ) als Double

Xcord = ( LON2 - LON1 ) als Doppel

Ycord = ( LAT2 - lat1 ) als Doppel
3

Verwenden Sie die ATAN mathematische Funktion zur Berechnung Azimut, wie folgt . Die Berechnung wird in Radiant Einheiten führen.

Azimut = atan ( Xcord /Ycord )
4

Neues explizite Funktion mit dem " rad2deg " und " CDbl "-Funktionen , um das Ergebnis zu konvertieren von Radiant in Grad -Einheiten , da Azimut wird in Grad gemessen . Zum Beispiel:

Funktion rad2deg (rad )

rad2deg = CDbl (rad * 180 /pi)

End Function