nhhh

x=" "
FOR i=1 TO RECCOUNT()
GOTO i
x=x+nume+" "+prenume+CHR(13)
ENDFOR
thisform.label1.Caption=x

x=" "
FOR i=1 TO RECCOUNT()
GOTO i

IF left(nume,3)="pop"
x=x+nume+CHR(13)
endif
ENDFOR
thisform.label1.Caption=x

x=" "
FOR i=1 TO RECCOUNT()
GOTO i
if(LEN(ALLTRIM(nume)))<=5
x=x+nume+" "+prenume+CHR(13)
endif
ENDFOR
thisform.label1.Caption=x