Example

Dim lsxECLPSObj as new lsxECLPS("A")
Dim Row, Col as Long 
Dim WaitString as String
 
WaitString = "Enter USERID"
Row = 20
Col = 16
 
if (lsxECLPSObj.WaitWhileString(WaitString,Row,Col,10000)) then
    MessageBox( "Wait condition met" )
else
    MessageBox( "Timeout Occurred" )
end if