Exemple

L'exemple suivant montre comment utiliser la méthode GetText.

Dim autECLPSObj as Object Dim TextStr as String ' Initialize the connection Set autECLPSObj = CreateObject("ZIEWin.autECLPS") autECLPSObj.SetConnectionByName("A") autECLPSObj.autECLFieldList.Refresh() TextStr = autECLPSObj.autECLFieldList(1).GetText()