活动

这是仿真器窗口的焦点状态。该属性既能更改又能检索。Active 是布尔数据类型，并且已启用读/写。但是，如果连接到的连接是就地嵌入式对象，则此属性为只读。下列示例展示了此属性。

Dim  autECLWinObj as Object
Dim  ConnList as Object
Set autECLWinObj = CreateObject("ZIEWin.autECLWinMetrics")
Set ConnList = CreateObject("ZIEWin.autECLConnList")
 
' Initialize the connection
ConnList.Refresh
autECLWinObj.SetConnectionByHandle(ConnList(1).Handle)
 
' Set to Active if not, and vice versa
If ( autECLWinObj.Active) Then
	autECLWinObj.Active = False
Else
	autECLWinObj.Active = True
End If