00view.prg

来自「我自己编写的用VFP的简单进销存程序供大家参考」· PRG 代码 · 共 8 行

FOR LNNUMBER=0 TO 255
  SELE (LNNUMBER)
  IF USED()
    =MESSAGEBOX('SELE：'+ALLT(STR(LNNUMBER))+' ALIAS：'+ALIAS()+' DBF：'+DBF(),64,'信息 ')
  ENDIF
ENDFOR
RETURN