mesafe

@Ali Kırksekiz'e teşekkürler. (y) İki koordinat arası mesafe hesaplarken, Enlem/Boylam parametreleri derece cinsinden yazılırsa, sonucu metre, kilometre, mil, deniz mili, yürüme/adım ve inç birimlerinde almak için ek'teki dosyayı ve yazılı KTF'yi kullanabilirsiniz.

İki farklı Enlem ve Boylam arasındaki mesafeyi Km veya Mil cinsinden aşağıdaki KTF ile alabilirsiniz. Public Function Mesafe(ByVal lat1 As Double, ByVal lon1 As Double, ByVal lat2 As Double, ByVal lon2 As Double, ByVal birim As String) As Double Dim fark As Double, mes As Double fark =...