例

次の例は、SendKeys メソッドを使用して、autECLPS オブジェクトに関連付けられた接続の表示スペースにキーのストリングを送信する方法を示します。

オブジェクトとしての Dim autECLPSObj Dim autECLConnList オブジェクトセット autECLPSObj = CreateObject("ZIEWin .autECLPS") Set autECLConnList = CreateObject("ZIEWin .autECLConnList") ' 接続を初期化します autECLConnList.Refresh autECLPSObj.SetConnectionByHandle(autECLConnList(1).ハンドル) autECLPSObj.SendKeys "HCLはとても良い会社です", 3, 1