visual foxpro 6 0，123456100Visual FoxPro用for endfor语句编程

本文目录一览

• 1，123456100Visual FoxPro用for endfor语句编程
• 2，Visual foxpro的问题
• 3，Visual FoxPro 数据库文件是
• 4，Visual Foxpro相关命令
• 5，Visual Foxpro
• 6，关于VisualFoxPro编程

1，123456100Visual FoxPro用for endfor语句编程

i=1j=0for i= 1 to 100 j=j+inext

2，Visual foxpro的问题

dele all for empty(字段名) PACK

3，Visual FoxPro 数据库文件是

aaa.dbc,aaa.dct,aaa.dcx 为vfp数据库aaa的组成文件，.dbf为表

.dbc

4，Visual Foxpro相关命令

标准是 SET DELETED ON/OFF 但是实际应用上 Visual Foxpro 的命令只要四个字符以上就可以识别，所以 SET DELETE ON/OFF SET DELET ON/OFF SET DELE ON/OFF 都有效。可以打开 Visual Foxpro 的命令行打来试试。

要用 SET DELETED ON/OFF ，不能用 SET DELETE ON/OFF 要用 ED 结尾的过去分词，表示被删除，被动语态。

5，Visual Foxpro

新建一个程序（文件菜单——新建——程序——新建文件），写代码： input "请输入成绩的值:" to aif a>=90 and a<=100 ?"该成绩优秀!"else if a>=75 and a<=89 ?"该成绩良好!" else if a>=60 and a<=74 ?"该成绩及格!" else if a>=0 and a<60 ?"该成绩不及格!" else ?"输入的数据必须在0－100之间!" endif endif endifendif 然后，直接点击感叹号，保存并运行，图：

加下我QQ吧，我再传给你

我用C++给你编个行不

6，关于VisualFoxPro编程

set talk off clear dime x(3) for i=1 to 3 input "请输入第"+alltrim( str(i))+"个数:" to x(i) endfor m=max(x(1),x(2),x(3)) &&最大数 n=min(x(1),x(2),x(3)) && 最小数 for t=1 to 3 if x(t)<>m and x(t)<>n mid=x(t) && 中间数 exit endif endfor ? m && 最大数 ? mid && 中间数 ? n && 最小数

set talk off DIME X(3) FOR I=1 TO 3 STEP 1 INPUT "请输入数X(" + LTRIM(STR(I)) +"):" TO X(I) ENDFOR *=====开始排序===== I=1 DO WHILE I<=2 J=I+1 DO WHILE J<=3 IF X(I)

文章TAG：Visual  foxpro  6  123456100Visual  FoxPro用for  endfor语句编程  for  语句