Возвращает значение долготы места съемки в градусах.

Применяется к:

IExifInfo

Синтаксис:

Visual Basic:

Function GetGPSLongitude() As Double

Пример:

Dim Tools As ZuluTools
Dim Info As IExifInfo

'Создаем объект ZuluTools
Set Tools = New ZuluTools

'Получаем IExifInfo
Set Info = Tools.GetExifInfo( "d:\images\IMG_0156.JPG")

'Проверяем наличие EXIF тэга, содержащего долготу места съемки
If  Info.IsTagExists(22)  = True Then

   MsgBox "Lon: " +  Str(Info.GetGPSLongitude())

End If