Ypos

这是仿真器窗口矩形左上点的 y 位置。该属性既能更改又能检索。Ypos 是长整型数据类型,并且已启用读/写。但是,如果连接到的连接是就地嵌入式对象,则此属性为只读。下列示例展示了此属性。

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