示例

以下示例展示了如何将表示空间中的文本复制到剪贴板，用于与 autECLPS 对象关联的连接。

Dim autECLPSObj as Object
’Initialize the connection

Set autECLPSObj = CreateObject("ZIEWin.autECLPS")

autECLPSObj.SetConnectionByName("A")
autECLPSObj.CopyText 6, 53, 10