Example

Dim lsxECLPSObj as new lsxECLPS("A")
Dim sRow, sCol, eRow, eCol as Long
Dim WaitString as String
 
WaitString = "Enter USERID"
sRow = 20
sCol = 16
eRow = 21
eCol = 31
 
if (lsxECLPSObj.WaitForStringInRect(WaitString,sRow,sCol,eRow,eCol,10000)) then
MessageBox( "Wait condition met" )
else
MessageBox( "Timeout Occurred" )
end if