capture a word from the screen

[kamakshi]

Hi
using select case capturing a word from the screen
even i find a word in the screen it goes next screen thans for helping

Select Case Search
 Case Is <> "CIND/CURCODE"

          MyScreen.Sendkeys("<PF8>")   ' next screen 
 

 MyScreen.Moveto 2, 40 
         
MyScreen.WaitHostQuiet (g_hostsettletime)
for i = 10 to 27
 
     

Set MyArea = MyScreen.Search("CURCODE") 
   MyScreen.WaitHostQuiet (g_hostsettletime) 
   MyScreen.Moveto MyArea.Bottom, MyArea.Left
                MyRw = MyScreen.Row 
                MyCol = MyScreen.Col

[