《Visualfoxpro学习笔记.pdf》由会员分享，可在线阅读，更多相关《Visualfoxpro学习笔记.pdf（13页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、Visual foxpro 学习笔记 关于索引：索引文件其实是只包含索引关键字与记录号的数据库文件。在 vf6.0 中的索引文件有两种，一种是单索引文件，另一种是复合索引文件，而复合索引文件又分为结构型复合索引文件与非结构型复合索引文件。它们的区别是单索引文件是用一个关键字表达式进行索引的文件，而复合索引文件可以看作是多个单索引文件的集合,也就是说可以看成是多个单索引文件合在一起，只不过用了同一个文件名而已,好比班级集体与单个学生之间的关系，在使用时，如果复合索引中只有一个索引，它与单索引文件一样,如果超过一个以上，为了告诉 VF 用哪一个排序,就得用一个叫做标记的变量来引用复合索引中的单个索
2、引.另一个结构与非结构的区别是：结构代表索引文件与表文件名相同，并随表文件的打开而打开，而非结构则不能随表的打开而打开,并且文件名与表文件名不同。这里还有一个疑问，复合索引与多关键字索引不一样，比如先按性别排序，如果相同，再按成绩排序，这种排序不是复合索引.建立索引的方法很多,但应注意一点，在用表设计器建立索引时，生成的文件都是复合索引,每一个索引关键字是复合索引中的一个标记.查找:查找有三个命令:findseeklocate 索引查询命令：find 与 seek Find 命令只能用在有索引文件并已经打开索引文件的条件下，使用时，直接在命令后面跟上要查找的关键字，不需要加引号,如果查找的是数
3、字,那在查找时只找与数字完全一样的记录，如果是字符，可以查找全部或从左边开始与查找字符相同的记录，如果找到就把指针定位在找到的记录上。它后面不能跟表达式。Seek 命令与 find 完全相同，不同地方是 seek 后面可以是表达式，而 find 不可以.顺序查询命令:locate 命令格式：LOCATE 范围 FOR WHILE时，默认为 ALL，如果所有可选项都缺省,则指针移向文件首记录。CONTINUE 命令必须与 LOCATE 命令配合使用，用以查找满足条件的下一个记录。CONTINUE 命令可连续使用直至查到文件结束为止。例:按指定条件定位记录 LOCATE FOR sold=18&将
4、记录定位在第 1 个年龄为 18 的学生记录上 LOCATE FOR ssex=“男”&将记录定位在第 1 个男同学记录上 查询的结果仅确定了记录指针的位置，若要了解记录的数据，还须与 DISPLAY 命令配合使用。库文件的分类排序 通过索引可以实现库文件的排序显示,然而库文件索引后本身并未变化，各记录仍按原来输入的次序排列,并非数据的重新组织。利用 SORT 命令能在已有库文件之外产生一个新的有序库文件，从而真正实现数据的重新组织。命令格式：SORT TO 新文件名 ON 字段名 1/A/C/D，字段名 2 /A/C/D WHILE 条件 FOR 条件 其中 TO 短语和 ON 短语的书写次
5、序可随意交换。范围、FOR 条件及WHILE 条件 等可选项用以确定当前库文件中需对哪些记录进行排序。若这些可选项在命令中缺省,则表示对全部记录排序。排序生成的新库文件默认扩展名为.DBF.新文件的结构由命令中的可选项 FIELDS 字段名表确定。若缺省此可选项，则新文件的结构与当前库文件的结构相同。若命令中出现多个字段名，表示多重排序。即先对排序,对于其中键值相同的记录,再按字段名 2排序，依次类推.可选项/A 与/D 分别表示升序或降序排序。按升序排序时/A 也可省略不写。C 表示排序时不区分字母的大小写,它可以与/A 或/D 联合使用。例：按年龄排序 USE student SORT O
6、N sold TO tt1.dbf 按年龄从小到大排序,并将结果存入tt1。dbf 中 索引和排序的比较 1.当排序的关键字只有单个字段名时，两条命令的关键字部分写法完全相同,但若排序的关键字为多个字段名时，在 SORT 命令中只须将这多个字段名依次列出，而在索引命令中，则要把他们组合成一个字符型表达式。例如：SORT ON sold，sno TO tt2 INDEX ON STR（sold，2)+sno TO tt3 2.执行 SORT 命令后将产生一个新的排序的库文件，而索引命令只产生一个索引文件，不改变原来库文件的记录顺序.尽管用 SORT 命令排序存在一些方便之处,但执行 SORT 命
7、令时要求有较大的内存，另外在磁盘上也至少要有当前库文件三倍容量的自由空间,因此凡索引能解决的问题，一般都不用SORT 命令解决。隐藏 VF 主窗口 方法一：在一个程序文件中加入命令：_screen.visible=。f.。把这个程序文件设为主文件。但要注意,还要设一个表单为顶层表单，否则会一闪而过.方法二：建一个名为 config.fpw 的文本文件，在其中加入命令：screen=off，但还是要注意，把一个表单设为顶层表单。原理分析：screen 这个变量是指主窗口，也就是表单属性中 showwindows属性中的“在屏幕中”的“屏幕,也就是说，VF 默认主窗口为顶层表单，而一个程序最少得有
8、一个顶层表单，如果把这个默认的顶层表单隐藏了，就必须设一个自编的表单。表单只有两种状态，要么做为项层表单，不受其它表单影响，要么做为“在项层表单中”，这样它随主表单（项层表单）的打开而打开,关闭而关闭。Config.fpw是一个VF的配置文件，在其中可加入许多命令,如：rescource=off，这样生成的 EXE 文件就不会在运行时产生 FOXUSER.DBF 和 FOXUSER。FPT这两个文件。两种方法比较的话用配置文件会更好，不会出现闪动，还有命令 cancel 与quit，后者会更好，也不会闪动.Read events 与 clear events 在开始接受事件处理时应加入 rea
9、d events 命令,完时加入 clear events 命令，如果开始不加的话，VF 就为会开始处理事件程序，会一闪而过，（针对 EXE 文件来说，APP 文件不需要）,clear events 命令告诉 VF 结束事件程序处理，但并不等于退出程序，要退出需加入 cancel 命令或 quit 命令.项层表单上运行菜单 步骤：1、隐藏主窗口，设置一个顶层表单。2、把菜单设为“在顶层表单中（在常规选项中设置）.2、在项层表单的 init 事件中加入 do menu。mpr with thisform,。t。设置相对路径 SYS（）函数 返回 Visual FoxPro 系统信息。返值类型 字
10、符型 说明 Visual FoxPro 的 SYS（）函数返回字符值，该字符值包含有用的系统信息。下表显示了每个 SYS（)函数返回的信息。获得 SYS（）函数的帮助 在命令窗口或程序中突出 SYS（)函数，并按 F1 键。函数名称 函数功能 说明 SYS(0）网络机器信息 SYS（1）儒略（Julian)系统日期 SYS（2）自午夜开始以秒计的时间 SYS（3）合法的文件名 SYS（5）默认驱动器 SYS（6）当前打印设备 SYS（7）当前格式文件 SYS（9）Visual FoxPro 系列号 SYS（10)来自儒略(Julian)日期的字符串 SYS(11)儒略(Julian）日期 SY
11、S（12）可用内存的字节数 SYS（13)打印机状态 如果打印机没有准备就绪，SYS(13）返回 OFFLINE;如果打印机准备就绪，SYS(13）返回 READY。如果打印机连接到一个串行通信端口，当打印机返回“Clear To Send Data”或“DataSet Ready”时，SYS（13）返回 READY.如果打印机连接到一个并行端口上，当打印机返回“Out of”、“I/O Error”、“Time Out”、“Printer Busy”或“Printer Not Selected”时，SYS(13）返回 OFFLINE。SYS（14）索引表达式 SYS（15）字符转换 SYS（
12、16)执行程序文件名 SYS(17）正在使用的处理器 SYS（18）当前控件 SYS(20）转换德文文本 SYS(21）控制索引编号 SYS（22）控制标志或索引名 SYS（23）Visual FoxPro 的 EMS 内存用法 SYS（24)EMS 内存限制 SYS（100）控制台设置 SYS(101）设备设置 SYS(102）打印机设置 SYS（103)对话设置 SYS(1001)Visual FoxPro 内存 SYS（1016）用户对象的内存使用 SYS（1023)启用诊断帮助模式 SYS（1024）终止诊断帮助模式 SYS（1037）“页面设置”对话框 SYS（1269）属性信息 S
13、YS（1270）对象位置 SYS(1271）对象的 SCX 文件 SYS（1272)对象层次 SYS（1500)激活系统菜单项 SYS（2000)文件名通配符匹配 SYS（2001）SET 命令状态 SYS（2002）打开或关闭插入点 SYS（2003)当前目录 SYS（2004）Visual FoxPro 启动目录或文件夹 SYS（2005）当前资源文件 SYS（2006）当前图形适配卡 SYS(2007)检查求和值 SYS（2010）CONFIG。SYS 文件设置 SYS(2011）当前锁定状态 SYS（2012）备注字段块大小 SYS（2013）系统菜单名称字符串 SYS(2014）最小
14、化路径 SYS（2015)唯一过程名 SYS（2016）SHOW GETS WINDOW 名称 SYS(2017）显示启动屏幕 SYS(2018)错误信息参数 SYS（2019)配置文件名称和位置 SYS（2020）默认磁盘空间 SYS(2021）筛选表达式 SYS(2022）磁盘簇(块）大小 SYS（2023）临时文件驱动器 SYS(2029）表类型 SYS（2333）开启或关闭 ActiveX 的双界面支持 设置相对路径 mlh=rat（,sys（16)）lj=substr（SYS(16）,1，mlh-1）set default to&lj 上面这段代码只能放在最开始的程序文件中进行初始化
15、，注意：rat()函数是返回某一字符串在另一字符串中的位置，是从最右边开始算起；而 substr（)是截取某一串字符中指定的字符。Set defalut to 是设置默认路径的，但后面只能跟字符，不能跟变量，且字符中不能有空格，如有应加引号，如果是变量要用宏带换符。如果变量中也有空格，也要加引号，如：”lj”。1。文本文件如何追加到备注型字段或将某段字符串追加到备注型字段 2。如何查找备注型字段中的某段字符 谢谢！repl XXX with filetostr(*.txt”)sssXXX 1、追加是加 ADDI：REPL 备注字段名 with filetostr（”*.txt”）ADDI 2、
16、除使用$外（包含为真，否则为假）,at/rat等函数都可以返回字符的所在位置(不包含为 0）判断一个表中的记录为空：同时满足 eof（)与 bof(）为真。在表单上更改 OLE 字段的值 方法：加一个命令按扭，通过单击，然后打开一个文件打开对话框，选择一个文件，如果不为空，就把这个文件加进来.要用要三个函数：getfile（）与 appdnd general 以及 empty(）显示一个获取文件名的对话框，并返回所选取的文件名。语法 GETFILE（文件扩展名,提示信息,确定按钮的标题 ,按钮状态）返值类型 字符型 参数描述 文件扩展名：指定在对话框中显示的文件扩展名。比如您只需要选取 bmp
17、 图形文件,那么您就可以用 getfile(bmp），在对话框的文件选取区(搜索)就只显示扩展名为 bmp 的文件和目录，文件类型区则显示 bmp,表示现在可供选择的文件只有 bmp,不过您也可以在这将文件类型改为全部文件。如果是空字符串或省略,则所有文件都显示出来供选择.扩展名中也可以用通配符*和?。还可以加扩展名说明，比如:getfile（位图文件：bmp),那么在文件类型处就会显示“位图文件”以代替“bmp”。也可以有多个扩展名，其中有分号(;)隔开,比如：getfile(dbf；idx;cdx）这样在文件类型中就可以有多种文件类型供选择。提示信息：您可以在对话框中输入文件的地方放上您自
18、己的提示信息，比如:getfile(bmp,输入文件名)不过要注意的是提示信息只能有 10 个字符，也就是 5 个汉字.确定按钮的标题：在对话框中有一个确定按钮,按下此按钮后，该函数就返回所选定的文件名，包括路径,您可以在该按钮上放上您喜欢的字符,比如：getfile(bmp，输入文件名,OK）按钮状态:该参数可以设为 0、1、2，0 与省略是一样的.设为 1，对话框中将会有一个“新建”按钮，按下此按钮,该函数将会返回“untitle”文件名,扩展名则根据文件类型而定.设为 2，会有一个“无”按钮，按手册上说按下这个按钮将会返回空字符串，但实际上与设置为 1 时是一样的，不知是怎么回事。说明
19、如果在对话框中按了 Esc 键、按了“取消按钮或者按了右上角的关闭按钮,那么函数将返回空字符串。另有一个函数 getdir（）用于获取目录名，用法与此函数相似.还有 getpict(），用于获取图片文件，其实就相当于 getfile(bmp；ico).getprinter（)用于获取打印机。示例 我们在用其它的软件时经常会碰到要求输入文件名的情况，这时往往在输入文件名的文本框边上有一个“浏览”窗口,按下此按钮就弹出文件选择对话框,可在其中选择文件名，按确定按钮后可将文件名自动填到文件输入的文本框中，有了 getfile（）函数,您也可以做出这样的程序来了。比如我们有一个存放图片文件的表,需要将
20、硬盘上的一些图片文件放入表中，那么就可以用 getfile(）获取图片文件名，再将它用 append general 命令放数据表的通用字段。方法就是设一输入文件名的文本框，假设是 text1，为其设一个 controlsource 变量,比如 fname,在文本框旁边放一个按钮，其 click 事件中写入如下语句：fname=getfile（bmp)thisform。text1.refresh 然后可用另一个“存盘按钮将该文件存入表中。注意 有时操作者可能不用这个浏览按钮，而直接输入文件名，但这样就可能输错文件名，如果根据错误的文件名存入表中，就会造成程序出错，为了避免这种情况可在 appe
21、nd general 语句前用 file（)函数检查一下这个文件是否存在，如果不存在则提示操作者重新输入文件名，比如“存盘按钮中的程序可以是这样：if file(fname)append general 图片 from fname else message（fname+文件不存在,请重新输入!，48+0+0，注意)thisform.text1。setfocus endif 在有些软件中为了减少操作出错,干脆将输入文件名的文本框设为只读,甚至将 enabled 设为.f。,只能通过按钮来选择文件名.A P P E N D G E N E R A L 命令 从文件中导入 O L E 对象，并将其放
22、入通用字段中.语法 A P P E N D G E N E R A L G e n e r a lF ie ld N a m e F R O M F i l eN a m e D A T A c E x p r e s s i o n L I N K C L A S S O L E C l a s s N a m e 参数描述 G e n e r a l F i e l d N a m e 指定放置 O L E 对象的通用字段名.可以用带有表别名的字段名来指定在非 当前工作区中打开的表的通用字段。F R O M F i l e N a m e 指定包含 O L E 对象的文件.必须给出文件全名
23、，包括扩展名。如果文件不 在当前目录或当前文件夹中，还需要给出文件的路径。D A T A c E x p r e s s i o n 指定字符表达式，此表达式作为一个字符串存入 O L E 对象的通用字段中。O L E 对象必须能接收和处理字符串。例如，不能往 P a i n t b r u s h 的图片对象 中存入字符串。L I N K 建立 O L E 对象和包含对象的文件间的链接。O L E 对象出现在通用字段，但 对象定义仍在文件中。如果省略 L I N K，O L E 对象将嵌入到通用字段中。C L A S S O L E C l a s s N a m e 为 O L E 对象指
24、定具体的 O L E 类，而不用其默认类。提示 您可以通过运行 R E G E D I T 并双击某一 O L E 对象来确定该对象的类名，类名列在“标识符 后。当包含 O L E 对象的文件的扩展名不同于默认扩展名,并且要强制类行为时,您可以指 定类名。如果默认扩展名可用于多个 O L E 服务程序，可用该类指定具体的服务程序。说明 如果在通用字段中已有一个 O L E 对象，它将被源文件中的 O L E 对象取代.若要从通 用字段中删除一个 O L E 对象，可不带任何附加参数地使用 A P P E N D G E N E R A L G e n e r a l F i e l d N a
25、 m e 命令(G e n e r a l F i e l d N a m e 是要清理的通用字段的名称)。其它相关信息，请参阅M i c r o s o f t V i s u a l F o x P r o 6。0 中文版程序员指南第十六章“添加 O L E”.示例 以下示例从 E x c e l 目录或文件夹中导入 M i c r o s o f t E x c e l 图表，存入通用字段 m y g e n f i e l d 中。C R E A T E T A B L E M y G e n T b l(m y g e n f i e l d G)A P P E N D B L A
26、N K 添加一个空记录 m y g e n f i e l d C:E X C E L B O O K 1.X L S C L A S S E X C E L C H A R T 请参阅 。.。SA Y 图片或 O L E 对象,M O D I F Y G E N E R A L，O L E B o u n d 控件 MESSAGEBOX（)MESSAGEBOX（)函数可以显示一个自定义的对话框。常用作提示之用，也可以作一些简单的选择,比如“确定”、“取消”等,程序中经常用到的一个函数。语法 MESSAGEBOX(提示信息,对话框的属型，对话框窗口标题）返值类型：数值型 参数描述 提示信息：对
27、话框中所用到的提示文字。对话框的属型：用于确定对话框的按钮、图标等属性,这是一个数值型的参数。设置按钮属性 值 对话框按钮属性 0 仅有一个“确定”按钮。1 有“确定”和“取消”按钮。2 有三个按钮，分别是“终止”、“重试”、“忽略”。3 “是”、“否”和“取消”按钮。4 “是”和“否”。5 “重试”和“取消”。比如：messagebox（是否真的要退出系统？，4）如果省略这个参数就相当于是 0.设置图标 值 图标 16 红色叉号 32 问号 48 感叹号 64 字母 I 如果又想要图标，又想要“是”、“否”两个按钮，可以按照如下的方式去做 messagebox（是否真的要退出系统?,4+32
28、)设置隐含按钮 值 隐含按钮 0 第一个按钮.256 第二个按钮。512 第三个按钮。比如：messagebox(是否真的要退出系统？，4+32）这一句，您希望显示对话框时，隐含的按钮为“否”,也就是按下“回车键即代表“否，那么就写成如下形式：messagebox(是否真的要退出系统？，4+32+256)对话框窗口标题：显示在对话框窗口上部，那个蓝色区域内的信息。比如：messagebox（是否真的要退出系统？，4+32+256,注意）如果设的数大于按钮的数，比如设为 512，但只有两个按钮,则隐含还是第一个按钮。说明 在对话框中按了不同的键,该函数将返回不同的值，键值对应如下：值 键 1 确
29、定 2 取消 3 终止 4 重试 5 忽略 6 是 7 否 这样我们就以根据不同的返回值作不同的处理了。过滤一些记录 Set delete on/off 过滤被删除的记录，注意对 goto 不起作用。Set filter to 在 grid 控件中如果删除记录会引起控件空白，一个好的解决办法是先把控件的数据源设为空，在删除后再把数据源设为原来的 cursor 的名字,注意要加引号，如:ThisForm。grd_4xx。recordsource=null delete pack ThisForm.grd_4xx。recordsource=”_4xx thisform.refresh 在这里的_4
30、xx 为数据环境中的一个指针对象的名字。使 grid 表格控件与文本控件同步的方法:在 grid 的 afterRowColChange 事件中加入 thisform。refresh 关于在 VFP 中 GRID 里颜色设置问题 1、只设置一条记录颜色（有选择性）主要是针对一个表 GRID 里,当我们选择了某个记录时，要使这个记录高亮显示，以区别其他记录,方便查看。在 GRID 的 AfterRowColChange 事件中，写入如下代码 LPARAMETERS nColIndex 系统代码 Mcurrec=allt(str（recn（)）)&获取当前所在记录号 this。setall（dyn
31、amicbackcolor”，IIF（RECNO（)=&Mcurrec.，RGB（255,0，0),RGB（255,255,255)）&设置背景色，满足条件为红色，不满足为白色 this。setall（”dynamicforecolor,IIF(RECNO(）=Mcurrec.，RGB（255，255,0），RGB（0,0,0），”column”)&设置前景色，满足条件为黄色，不满足为黑色 this.refresh&这个刷新必须要，不然不满足条件的记录所显示的高亮显示就不会退去 2、设置多种颜色（无规律性）主要是针对一个表GRID 里，当记录很多时，而且某些记录具有特定的属性时，我们需要设置颜
32、色来区分这些数据，如下代码可以在刷新或初始化表单时，设置其属性.thisform.Grid1.SetAll(”DynamicBackColor”，IIF(type=1,iif（type=2,iif(type=3,rgb(0,128，0），rgb（192,192，192）)，rgb（255,0,0），rgb（255，255，255)如上代码可以说明，如果某记录中有一个字段 type，那么根据这个字段的数据值,可以显示不同颜色，可以转换成如下公式:iif(条件 1，iif（条件 2,iif（条件 3,iif（条件 4，iif（条件 5,。.iif(条件 N，颜色 N,颜色 n1).。.，颜色 5,
33、颜色 4),颜色 3），颜色 2），颜色 1)，其他颜色）3、设置多种颜色(有规律性）这种就比较简单了，一般是在看较多记录时，多了让人眼花缭乱,所以每隔一行设置颜色,就是thisform。Grid1。SetAll(DynamicBackColor，”IIF(MOD(RECNO（)，2)=0，RGB(255，255,255）,RGB(0,255，0)）”，”Column)如何在 GRID 的单元格中显示列表框 第一步：在属性对话框中选择到 GRID1 某列下的 TEXT1 控件。第二步：用鼠标激活表单，注意点击标题栏即可.第三步：按 DEL 键，即删除了某个 TEXT1 控件，此时 GRID1
34、的某 COLUMN下为空，其他的为 TEXT1 控件。第四步：从表单工具栏上选择一个 COMBO，将鼠标移到 GRID1 上，鼠标成+字型,放在刚才删除 TEXT1 的位置上,按下鼠标左键,即可！第五步：可以到属性对话框中对此 COMBO1 进行属性设置！如何在 GRID 里控制回车事件 在 VFP 里，GRID 的默认控件都是 TEXTBOX，形成了一个表格,但是在这个二维表里进行操作时，每次按回车都是往后一个单元格跳转,当到最后一列时,则继续跳到第一列,进而循环，使操作很不方便，特别是一些要按照 DOS 的操作习惯的,希望回车时，可以往下移动单元格，或在最后一列回车时回到第一列等操作.下面
35、说明如何在GRID 里的一个列里按回车使记录连续往下跳转（或可以执行其他的操作），当跳转到最后一行时执行另一个操作。、对 GRID 所在的表单新增属性:cur_recn 记录当前记录号 cur_recc 记录最大记录号 2、在表单初始化,或给 GRID 以数据源时，就先计算出该表的最大的记录数，如下：thisform.cur_recc=recc()为了一次得到当前 GRID 里的表的记录总数 3、在 GRID 的 AfterRowColChange 事件里写：thisform.cur_recn=recn（)为了得到当前的 GRID 里的表的记录号 4、在 GRID 里的某列的 TEXT1 的
36、KEYPRESS 事件里:if nKeyCode=13&当按键为回车时 if thisform.cur_recn=thisform.cur_recc -当当前记录大于等于最大记录时,即记录已到最后一个时 mand1。setfocus *-使表单上的一个命令按纽聚焦，也即可以跳出该 GRID，*-而正常的操作很难从 GRID 里跳出，在这里就可以使在记录到最后时焦点跳出来 else thisform.cur_recn=recn（）&当记录还没到尾时，则.。nodefault&不做任何响应 keyboard”dnarrow 模拟键盘下箭头，使记录指针下移一个 endif endif 将参数传递到表
37、单 在运行表单时，为设置属性值或者指定操作的默认值,有时需要将参数传递到表单。若要将参数传递到在表单设计器中创建的表单 1.创建容纳参数的表单属性，如 ItemName 和 ItemQuantity。2.在表单的 Init 事件代码中，包含 PARAMETERS 语句：PARAMETERS cString,nNumber 3.在表单的 Init 事件代码中，将参数分配给属性：THIS.ItemName=cString THIS。ItemQuantity=nNumber 4.当运行表单时，在 DO FORMlngDO_FORM 命令中包括一个 WITH 子句:DO FORM myform WIT
38、H Bagel，24 从表单返回值 在整个应用程序中都可以使用表单，让用户指定值。若要从表单返回值 1.将表单的 WindowType 属性设置为 1,使表单成为有模式表单。2。在与表单的 UnLoad 事件相关的代码中,包含一个带返回值的 RETURN 命令。3.在运行表单的程序或方法程序中，在 DO FORM 命令中包含 TO 关键字。例如，如果 FindCust ID 是一个返回字符值的有模式表单，下面的一行代码将返回值返回到一个名为 cCustID 的变量中。DO FORM FindCustID TO cCustID 有关详细内容，请参阅“帮助”中的 RETURN 和 DO FORM 主题。疑难解答 如果出现错误，请确保将 WindowType 设置为 1（模式）。