Visual Basic ou VB é uma linguagem de programação Microsoft que é amplamente utilizado fordeveloping profissional de negócios e aplicações pessoais. Ele fornece aos usuários uma gama de controles, objetos e propriedades para codificar e analisar os progressos do trabalho através de uma interface gráfica de usuário intuitiva. VB pode ajudar você a realizar simples para avançar operações, como calcular o azimute , com a ajuda built-in funções matemáticas. Azimute é uma medida angular usada para determinar a posição de objetos na esfera celeste . Em geral, é medido a partir do ponto cardeal norte e representa o ângulo de separação entre dois pontos distantes sobre um plano horizontal . Instruções
1

Lançar o projecto Visual Basic em que você vai calcular azimute.
2

Defina o X (latitude ) e Y ( longitude) coordenadas para os dois pontos que você deseja usar para calcular o azimute . Por exemplo : Azimute Função Pública ( lat1 , lon1 , lat2 , lon2 ) como

dobro

Xcord = ( lon2 - lon1 ) como dupla

Ycord = ( lat2 - lat1 ) como dupla
3

Use a função matemática ATAN para calcular o azimute , como segue. O cálculo resultará em unidades de radianos .

Azimute = ATAN ( Xcord /Ycord )
4

Criar uma função explícita usando o " rad2deg " e " funções" CDbl para converter o resultado a partir de unidades de radianos para graus , desde azimutal é medido em graus . Por exemplo :

rad2deg Função ( rad)

rad2deg = CDbl (rad * 180 /pi)

End Function