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