ArcPad Scripting Object Model
Bottom Property
See Also  Example  Send comments on this topic.
Rectangle Object : Bottom Property

Glossary Item Box

Description

Returns or sets the minimum Y coordinate of the rectangle, in the coordinate system of the current map.

Property type

Read-write property

Syntax

object.Bottom = [ value ]

Return Type

Double

Example

Gets the map extent (a Rectangle) and displays information about its properties in a message box.
Rectangle Example (VBScript)Copy Code
Sub GetMapExtent
  Dim objExtentRect
  'Get the map extent
  Set objExtentRect = Application.Map.Extent
  'Display the rectangle's information
  MsgBox "Map Extent Geometry:" & VBCr &_
         "Bottom: " & CStr(objExtentRect.Bottom) & VBCr &_
         "Top: " & CStr(objExtentRect.Top) & VBCr &_
         "Left: " & CStr(objExtentRect.Left) & VBCr &_
         "Right: " & CStr(objExtentRect.Right) & VBCr &_
         "Floor: " & CStr(objExtentRect.Floor) & VBCr &_
         "Ceiling: " & CStr(objExtentRect.Ceiling) & VBCr &_
         "Min. Measure: " & CStr(objExtentRect.MinimumMeasure) & VBCr &_
         "Max. Measure: " & CStr(objExtentRect.MaximumMeasure) & VBCr &_
         "Center: " & CStr(objExtentRect.Center.X) & ", " & CStr(objExtentRect.Center.Y) & VBCr &_
         "Map Extent Dimensions:" & VBCr &_
         "Width: " & CStr(objExtentRect.Width) & VBCr &_
         "Height: " & CStr(objExtentRect.Height) & VBCr &_
         "Depth: " & CStr(objExtentRect.Depth) & VBCr &_
         "Measure Range: " & CStr(objExtentRect.MeasureRange) _
         ,vbInformation,"Map Extent"
  Set objExtentRect = Nothing
End Sub

See Also

© 2012 All Rights Reserved.