示例

以下示例展示了如何将文本从剪贴板粘贴到与 autECLPS 对象关联的连接的表示空间。

Dim autECLPSObj as Object
’Initialize the connection

Set autECLPSObj = CreateObject("ZIEWin.autECLPS")

autECLPSObj.SetConnectionByName("A")
autECLPSObj.PasteText 8, 53, 10