vfp教程跪求vfp编程实例

VFP程序如何编写

1、建立一个表单1 2、在表单1的数据环境中加入表1 3、在表单中添加控件text1文本框，作为用户输入要查询的条件 4、添mand1命令按钮，caption属性为“查询” mand1的click事件中加入以下代码： sele * from 表1 where 字段1=form.text1.value &&这里可以举一反三，我只是抛砖引玉。

6、运行表单1： do form 表单1 &&在表单的文本框中输入要查询的内容，点击“查询”按钮，就显示符合条件的记录了。

VFP程序编写

1. 编写程序求数列2/1,3/2,5/3,8/5，m/n，m+n/m的前二十项和。

新建一个程序（文件菜单——新建——程序——新建文件），写代码：

sum=0 temp=0 j=2 k=1 for i=1 to 20 temp=j/k sum=sum+temp j=j+k k=j-k next ? "数列2/1,3/2,5/3,8/5，m/n，m+n/m的前二十项和是: ",sum

图：

2. 从键盘输入一串字符串，统计其中的字母（不分大小写），数字和其他字符的个数。

新建一个程序（文件菜单——新建——程序——新建文件），写代码：

ept "请输入一个字符串:" to s x1=0 x2=0 x3=0 for i=1 to len(s) t=asc(substr(s,i,1)) if t>=65 and t<=90 or t>=97 and t<=122 x1=x1+1 else if t>=48 and t<=57 x2=x2+1 else x3=x3+1 endif endif next ?"字母的个数:",x1 ?"数字的个数:",x2 ?"其它字符的个数:",x3

图：

计算机二级Vfp怎么自学_

可以上优酷啊，土豆什么的网站去看VFP的教学视频，很多，可以找一个系列的看，自己买一本VFP国家二级书，以及相关的辅导资料（历年真题之类的，市面上很多，而且相关辅导书一般都有光碟可以安装模拟软件，这样上机题也可以自己操练，还有详解），书上的重点内容要看，不明白可以一边做题一边根据书上内容理解，VFP的笔试一般不难，做一套卷子多看看课本一般很容易过（我身边有很多人就准备了几个晚上做做题，竟然也过了，要对自己有信心），上机考试会比笔试难一些，看看教学视频和资料书上都会有教学详解，祝你成功！

谁能教教我VFP考试怎么能容易过？？？？？

考全国计算机等级考试对大家来说已经是一种时尚，但是很多人考试带有从众和盲目心理。

　　我报考的是2005年9月份的二级VF，从8月份中旬开始复习，用了一个月的时间，最后一次性通过了。

需要注明的是去年我还只是一名大学预科生，自学这些大学一二年级才学课程，对我来说是有一定难度的，回首那段日子，感触颇多，现在拿出来和大家分享，并希望对参加等级考试的同学有所帮助。

　　一、要端正考试态度、做好考前准备。

不能一心只想为了拿证，只为了拿证而学习，过程就很枯燥了，一定要把这次考级经历看作自己知识的积累过程。

其次要对自己报考的科目有一个比较系统的了解，经常上一些等级考试相关的网站了解最新动态，例如：考试吧计算机等级考试网（puter/djks/ ），我考试时在这个网站知道很多关于考试的内容和信息，对通过考试有帮助。

其次加入一些考试的QQ群和社团对保持学习热情有益处。

　　二、关于复习时间。

备考时间不能长，最好一个月，因为每天都看同一本书和同些知识点对任何人来说都是不容易的，时间长了会产生厌烦感。

　　三、关于复习技巧。

如果是第一次看VF或者是别的考试教程，一定要静下心来仔细阅读，即使看不懂也要坚持往下看，等看完了再回头去看那些没看懂的，看过几遍你就会恍然大悟。

我自己在备考期间第一遍看教程每天保证一章，在看教程的时候不管老师说的重点还是不重点都要通看，第二遍之后在又选择的看，一定把教材看透，这是得分的关键。

　　再次，学习基础知识的同时，要配合练习。

我建议大家除了看教程之外要做题。

历年真题也很重要，做真题应该在把教程看完两遍以上在做，做题过程中（练习题也一样）要备一个错题本，把自己不会的或作错的题都要摘记下来，然后在翻教程把自己没有理解的知识点搞懂。

当然光看教程是不够的，一定要上机去实践，只有这样才能真正把知识点理解。

这点是很关键的，上机考试也需要你对考试环境很熟悉，了解上机操作技巧，多运行程序才能胸有成竹。

　　四、关于考试答案。

一定不能轻信那些关于笔试包过的答案，要靠自己。

这是我深有体会的一件事，和我一起学VF的一个同学，很勤奋，学的也很好，但是考试却没过，原因是考试的时候用了传来的答案。

大家也想想，那些答案哪来的？也是在考场中人做出来的，必然有错误在里面。

与其相信不知道是谁的答案，还不如相信自己。

　　最后，计算机的成绩回来的比较慢，一般都要两个月。

等成绩的过程也是很难的，大家可能每天都要上网去看看，不过一定要记住不要随便在网上对答案，只有官方网站答案才可信，其他网站转载的只能作为参考答案。

　　以上是我在考试的时候的心得，希望这些经历可以对你有所帮助，attitude is everything.（态度决定一切）这是我最喜欢的一句话，送给大家，希望都能顺利通过考试，为自己的人生道路增上绚丽的一笔。

跪求vfp编程实例

*题目:求当1!+3!+5!+...+N!的值不超过10的20次幂时的临界值及N的值

*------------------------------------------------------- *注意：不可以增加或删除程序行，也不可以更改程序的结构。

*------------------------------------------------------- SET TALK OFF CLEAR ***********FOUND********** S=0 STORE 1 TO T,N DO WHILE S<=1E+20 T=T*(N+1)*(N+2) S=S+T ***********FOUND********** N=N+1 ENDDO ***********FOUND********** ?"S=",S-T ?"N=",N-2 SET TALK ON

例子二

1000之内能被3和7整除的数的个数

SET TALK OFF CLEAR N=1 S=0 DO WHILE N<=1000 IF INT(N/3)=N/3 AND INT(N/7)=N/7 S=S+1 ??N ENDIF N=N+1 ENDDO ?"1000之内能被3和7整除的数的个数和为："+ alltrim (STR(S,5)) SET TALK ON 例子三

若干数中最大最小数

set talk off clear

input "m=" to m store m to d,x

do while .t. input "n=" to n if d<n d=n endif if x>n x=n endif

wait "是否继续输入:" to YN if upper(YN)="Y" loop else exit endif enddo ?"最大数是:",d ?"最小数是:",X