例
以下の例は、SendKeys メソッドを使用して、autECLPS オブジェクトに関連する 接続の表示スペースにキーのストリングを送信する方法を示しています。
Dim autECLPSObj as Object
Dim autECLConnList as Object
Set autECLPSObj = CreateObject("ZIEWin.autECLPS")
Set autECLConnList = CreateObject("ZIEWin.autECLConnList")
' Initialize the connection
autECLConnList.Refresh
autECLPSObj.SetConnectionByHandle(autECLConnList(1).Handle)
autECLPSObj.SendKeys "HCL is a really cool company", 3, 1