VFP编程实例:累加、阶乘、条件定位等
需积分: 9 34 浏览量
更新于2024-09-11
1
收藏 50KB DOC 举报
"精选VFP常见编程实例"
在Visual FoxPro (VFP)编程中,这些实例涵盖了基础的循环、条件判断以及数据处理等概念。下面是对这些实例的详细解释:
1、1-100的累加
这是一个简单的循环累加的例子,使用`DO WHILE`循环结构来实现。变量`s`初始化为0,`i`初始化为1,然后在循环体内累加`i`到`s`,每次循环`i`自增1,直到`i`超过100。最后显示累加结果。
2、阶乘
这个实例计算5的阶乘,即5! (5 * 4 * 3 * 2 * 1)。同样使用`DO WHILE`循环,但这次是将`j`初始化为1,`i`从1递增到5,每次循环`j`乘以`i`的当前值。完成后显示`j`作为阶乘结果。
3、求阶乘和
这个实例不仅计算阶乘,还计算1到5所有数的阶乘之和。在循环中,`s`用于累加每个数的阶乘,`j`用于计算当前数的阶乘。最后显示`s`作为阶乘和。
4、条件定位
这部分展示了如何在数据库中使用`LOCATE FOR`语句找到特定记录,这里是寻找姓名为"赵伟"的记录。如果找到,使用`DISPLAY`显示记录,否则取消操作。
5、用`SCAN`语句查询定位
`SCAN`语句用于遍历数据库中的所有记录,这里查找姓名为"赵伟"的记录并显示。
6、显示年龄小于30岁的记录
这个实例使用`SCAN`语句配合条件判断`IF`,找出并显示年龄小于30岁的所有记录。
7、查找男性职工
这里有三种不同的方法查找性别为"男"的记录。第一种使用`LOCATE FOR`和`DISPLAY`,第二种结合`FOUND()`和`DOWHILE`,第三种使用`.t.`(True)作为`LOCATE FOR`的结束条件,结合`IFFOUND()`和`CONTINUE`。
8、新值换旧值
此实例涉及数据库操作,它打开数据库并选择`stu.dbf`表,然后使用`SCAN`语句遍历记录。对于每个记录,如果性别为"女"则跳过,否则显示并跳过该记录。最后关闭数据库并返回。
9、兔子繁殖问题(斐波那契数列)
这个问题是经典的斐波那契数列的应用,模拟兔子繁殖。从第三个月开始,每对兔子每月生一对新的兔子。这里没有给出完整的代码,但思路应该是创建一个循环,根据月份计算出兔子对数。
这些实例涵盖了VFP的基础语法,包括循环、条件判断、数据库操作和数组处理等,是学习VFP编程的良好起点。通过理解并实践这些实例,开发者可以逐步掌握VFP的基本编程技能。
2023-03-11 上传
2011-12-29 上传
点击了解资源详情
2017-03-13 上传
2012-09-04 上传
104 浏览量