Ypos

これは、エミュレーター・ウィンドウ長方形の上方左の角の y 位置です。このプロパティーは、変更と検索の両方が可能です。Ypos は、Long データ型で読み取り/書き込み可能です。ただし、付加した接続がインプレースの組み込みオブジェクトである場合は、このプロパティーは読み取り専用です。以下の例は、このプロパティーを示しています。

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