VFP表单设计摇奖程序

比如是对学生表抽神简念奖：

在数据环境添加"学生.dbf"

计时器timer1 的interval属性设为100（当然可以换成1000等也可以，随便咐磨设）

form1的init事游困件代码：

thisform.timer1.enabled=.f.

thisform.text1.value=“幸运者姓名”

按钮“开始滚动”的click事件

thisform.timer1.enabled=.t.

thisform.text1.value=姓名

按钮“停止”的click事件

thisform.timer1.enabled=.f.

timer1的timer事件代码

sele 学生

skip

if eof()

go top

endif

thisform.text1.value=姓名

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

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

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

VISUAL FOXPRO的基本数据元素：

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

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

1：select 学号,姓名,性别,专业 from 学生档案表

2：select 高数 from 学生成绩表 where 高数>60

3：select 学号,姓名,性别 from 学生成绩表 where 高数>60

4：select * from 学生档案表 where 姓名 like "张%"

5：select 课程号,count(*) as 人数 from 选课登记表 group by 课程卜茄袭号

6：select 姓名 from 学生档案表 where 学号 not in (select 学号 from 选课登记表)

7：insert into 选课登记表(学号,课程号,成绩) values ("1111","222",80)

8：use 数据表纳清

replace all 综合测评成绩 with 综合测评成绩+1

9：use 数型兄据表

delete for 高数=0

pack

---