例
以下の例は、autECLPS オブジェクトに関連する接続について、 表示スペース内の長方形域から文字を検索する方法を示しています。
Dim autECLPSObj as Object
Dim PSText String
' Initialize the connection
Set autECLPSObj = CreateObject ("ZIEWin.autELCPS")
autECLPSObj.SetConnectionByName("A")
PSText = GetTextRect(1,1,2,80)