Ypos
This is the y position of the upper left point of the emulator window rectangle. This property may be both changed and retrieved. Ypos is a Long data type and is read/write enabled. However, if the connection you are attached to is an inplace, embedded object, this property is read-only. The following example shows this property.
Dim autECLWinObj as Object
Dim ConnList as Object
Dim y as Long
Set autECLWinObj = CreateObject("ZIEWin.autECLWinMetrics")
Set ConnList = CreateObject("ZIEWin.autECLConnList")
' Initialize the connection
ConnList.Refresh
autECLWinObj.SetConnectionByHandle(ConnList(1).Handle)
y = autECLWinObj.Ypos 'get the y position
' or...
autECLWinObj.Ypos = 6081 'set the y position