VFP怎么设置查找自身目录下文件

命令方式

set default to 目录的绝对路径 这是设置工作目录，即本次使用的目录！

菜单方式

"工具"-"选项"-"文件位置"-"默认目录"

勾上使用默认目录，并修改路径，然后确认

一 、可以直接点击在VFP文件夹下后罪名是PRG的文件

二、进入 VFP 后 可以有以下方式进入：

1、点击菜单栏打开，然后在对话框下的下拉框中选中程序，然后点击你所要打开的程序就可以了。

2在项目管理器中打开

表单INIT事件

note 如果没有事先定义 TEXT1-TEXT10的数据类型，应该都是数值型，定义如下

for lnI=1 to 11

ctext="text"+transform(lnI)

thisform&ctextvalue=0

endfor

dimension n(10) &&定义数组

note 把输入值付给数组

n(1)=thisformtext1value

n(2)=thisformtext2value

n(3)=thisformtext3value

n(4)=thisformtext4value

n(5)=thisformtext5value

n(6)=thisformtext6value

n(7)=thisformtext7value

n(8)=thisformtext8value

n(9)=thisformtext9value

n(10)=thisformtext10value

maxx=n(1)

FOR k=1 to 10 &&找到最大值

IF maxx<n(k)

maxx=n(k)

ENDIF

ENDFOR

minn=n(1)

FOR k=1 to 10 &&找到最小值

IF minn>n(k)

minn=n(k)

ENDIF

ENDFOR

un=0

FOR k=1 to 10 &&和

un=un+n(k)

ENDFOR

av=(un-maxx-minn)/8 &&求平均

thisformtext11value=av &&返回值

use

职工表

accept

"请输入你要查找的职工id:"

to

idh

loca

for

id=idh

if

found()

disp

else

messagebox("查无此人!",0,"系统消息")

endi

以上就是关于VFP怎么设置查找自身目录下文件全部的内容，包括:VFP怎么设置查找自身目录下文件、如何调用vfp应用程序、vfp 提示 *** 作符 *** 作类型不匹配 求大神解答 源程序如下：等相关内容解答，如果想了解更多相关内容，可以关注我们，你们的支持是我们更新的动力！