例

以下の例は、接続名により autECLConnList オブジェクト内の要素を 見つける方法を示しています。

Dim Hand as Long
Dim autECLConnList as Object
Dim ConnObj as Object
 
Set autECLConnList = CreateObject("ZIEWin.autECLConnList")
 
' Initialize the collection
autECLConnList.Refresh
' Assume Hand obtained earlier
Set ConnObj = autECLConnList.FindConnectionByName("A")
Hand = ConnObj.Handle