>>use table in 81 >>use table in 82 >>>>some may also have tabs at the beginning of the lines.
>function do_it() > > local RegExp, Match, s, i > RegExp= CreateObject('VBScript.RegExp') > RegExp.IgnoreCase = TRUE > RegExp.Global = TRUE > > RegExp.Pattern = "use\s+.+\s+in\s+[1-9]\d*" > > s = [use ('ppp') in 24] > > Match = RegExp.Execute(s) > > do case > case empty(Match.Count) > && nothing > > otherwise > for i = 0 to Match.Count-1 > ? Match.Item[i].Value > endfor > endcase > >endfunc >