在程序源代码中加上必要的注释,可以增强程序的可读性,也便于日后的维护。注释语句是一种非执行语句,在 VFP 支持 3 种类型的注释 格式:1、使用 NOTE 或*命令声明该行是一个注释行;2、使用&;&;命令在一个语句的末尾加入注释;3、直接在 IF...ENDIF、DO...ENDDO、 FOR...ENDFOR 等语句后面直接写注释 用 FUNCTION 命令可以创建一个自定义函数,其基本语法如下: FUNCTION FunctionName [LPARAMETERS parameter1[,parameter2],...] COMMAND [RETURN [eExpression]]ENDFUNC 或 者 COMMAND [RETURN
FUNCTION FunctionName([parameter1[AS para1type][,parameter2 [AS para2type]],...]) [AS returntype] [eExpression]] ENDFUNC
参数说明:FunctionName 是要建立的函数名称;LPARAMETERS parameter1 用于定义接收参数;COMMAND 是命令语句;eExpression 是返回给调用程序的表达式。第二种 AS para2type 子句用于定义参数的数值类型;AS returntype 子句用于定义返回给调用程序表达式的 数值类型。
贴个简单的查重语句:SELECT * FROM 表 1 INTO TABLE new.dbf GROUP BY KEY HAVING COUNT(KEY) > 1 将把表 1 中 key 关键字重 复的记录检索出来放到表:new.dbf 中!
1、 表单调用最小化! 如果希望表单在调用时以最小化运行, 可以向表单的 Init 事件传递一个参数: 例: DO FORM formname WITH 1 1 2、 想在按钮中加入快捷键,可在 标题(Caption) 属性加入 "\<"符号。例: 此主题相关图片如下: Caption 属性为 取消(\
3、将列表框(ListBox)的 MultiSelect 属性设为 .T. 即可用 Shift 或 Ctrl 键同时选择连续或不连续的多项. 此主题相关图片如下:
5、在给列表框(ListBox)控件添加数据项时,可以在表达式前面添加一个'\'反斜杠来废止一个数据项。例:This.AddItem ('\此项禁止 ')This.AddItem ('梅子论坛') 此主题相关图片如下:
6、 用一个分割符加一个连字符 ‘\-’ 可以给列表框(ListBox)控件加入一条分割条 This.AddItem ('梅子论坛')This.AddItem ('\-')This.AddItem ('帮助论坛') 此主题相关图片如下:
7、IncrementalSearch 属性指定在用户键入每一个字母时,组合框(ComboBox)是否支持递增搜索。 8、建立带颜色条的组合框 此主题相关图片如下:
源代码
点击浏览该文件
9、计时器(Timer)控件的 Interval 属性的取值范围从 0 至 2147483647,也就是说最长的间隔约为 596.5 小时,超过 24 天,值为 0 时不触 发 Timer 事件 10、表格(Grid)控件的 View 属性设为 1 或 2 可以得到如下界面,即左窗口为浏览,右窗口为编辑格式 此主题相关图片如下:
未使 VFP 支持长(带空格)文件夹路径名拷贝,可以将文件夹及文件名称用字符串界定符号界定即可。如:copy file 'c:\program files\aa bb cc\???.??? ' to 'd:\ss dfrt dd\ee ww\???.???'执行成功
!! !
为使打印报表的页末端的备注紧贴打印内容,可以在报表中设置分组表达式:1+2>1,然后在组注脚处添加内容即可,例如添加:注:本 表应于 XX 年 XX 月 XX 日上报 XX 单位。此法同样适用于作页面合计和最终合计! ! 自定义函数调用方法与调用 VFP 系统函数类似,针对自定义函数存放位置不同有两种方法:1、调用存放在同一程序中的自定义函数与调 用 VFP 系统函数完全一样;2、调用存放在其它程序文件中的与调用 VFP 系统函数,需要先用以下代码来打开存放自定义函数的过程文件: SET PROCEDURE TO 存放自定义函数的文件名,过程文件打开后就能和 VFP 系统函数一样调用了,最后要 SET PROCEDURE TO 关闭过 程文件。
我也来发一个.当你使用按键事件时,却不知道相应键的 ASCII 值就可以用下面的方法得到该键的值!(支持组合键)在表单的 INIT 中写:SET SYSMENU OFFSET SYSMENU TO 然后在 KEYPRESS 中写:SET MESSAGE TO STR(NKEYCODE)在 UNLOAD 中写:SET