アクティブ

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

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