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

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

IExifInfo

Синтаксис:

Visual Basic:

Function GetGPSLatitude() 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(20)  = True Then

   MsgBox "Lat: " +  Str(Info.GetGPSLatitude())

End If