什么是“VFP程序设计”?

“VFP程序设计”简称VFP或VF。VFP是面向对象的数据库管理系统将使您可以创建出具有艺术性的企业数据库解决方案。

VFP是一个功能强大的交互式数据管理工具，而且可以创建应用程序来充分发挥其完善的功能。掌握 Visual FoxPro的面向对象程序设计技术以及事件驱动模型，可以最大限度地提高程序设计的效率。

VFP还提供了一个集成化的系统开发环境，它不仅支持过程式编程技术，而且在语言方面作了强大的扩充，支持面向对象可视化编程技术，并拥有功能强大的可视化程序设计工具。目前，VFP是用户收集信息、查询数据、创建集成数据库系统、进行实用系统开发较为理想的工具软件。

VISUAL FOXPRO的基本数据元素：

（1） 常量、变量、表达式。

（2） 常用函数：字符处理函数、数值计算函数、日期时间函数、数据类型转换函数、测试函数。

*

VFP中定义一个判断N是

素数

的函数，然后调用该函数求2~10000内的全部素数

SET

TALK

OFF

CLEAR

FOR

i1

=2

TO

1000

IF

ispn(i1)

??i1

ENDIF

ENDFOR

SET

TALK

ON

RETURN

FUNCTION

ispn

PARAMETERS

sz

IF

sz<2

RETURN

.f.

ENDIF

ssbz=.t.

FOR

j1=2

TO

sz-1

IF

MOD(sz,j1)=0

ssbz=.f.

EXIT

ENDIF

ENDFOR

RETURN

ssbz

正确的程序如下：

set talk off

i=0

input "输入一个正数(0结束):" to a

do while a<>0

if a>0

if i=0 .or. a>v_max

v_max=a

endif

if i=0 .or. a<v_min

v_min=a

endif

i=i+1

else

? '搞错了，只能输入正数，不准为负数！'

endif

input "输入一个正数(0结束):" to a

enddo

?'你总共输入了',i,'个数，最大的是',v_max,'，最小的是',v_min

运行过程见附图

---