Visible

This is the visibility state of the emulator window. This property may be both changed and retrieved. Visible is a Boolean 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
Set autECLWinObj = CreateObject("ZIEWin.autECLWinMetrics")
Set ConnList = CreateObject("ZIEWin.autECLConnList")
 
' Initialize the connection
ConnList.Refresh
autECLWinObj.SetConnectionByHandle(ConnList(1).Handle)
 
' Set to Visible if not, and vice versa
If ( autECLWinObj.Visible) Then
	autECLWinObj.Visible = False
Else
	autECLWinObj.Visible = True
End If