文档介绍:该【vf命令函数程序设计公开课一等奖课件赛课获奖课件 】是由【梅花书斋】上传分享,文档一共【32】页,该文档可以免费在线阅读,需要了解更多关于【vf命令函数程序设计公开课一等奖课件赛课获奖课件 】的内容,可以使用淘豆网的站内搜索功能,选择自己适合的文档,以下文字是截取该文章内的部分文字,如需要获得完整电子版,请下载此文档到您的设备,方便您编辑和打印。一、VF命令及有关内容
二、常用函数
三、程序设计举例
四、表单设计举例
一、VF命令及有关内容
1. 内存变量及变量赋值
内存变量可以通过赋值语句建立,法格式如下:
<内存变量名> = <体现式>
STORE <体现式> TO <内存变量名列表>
2. 字符串比较方式设置
SET COLLATE TO [ 'PinYin' | 'Stroke' ]
3. 交互方式设置
SET TALK { ON | OFF }
4. 数组阐明
{DIMENSION | DECLARE} <数组名1>(<行数>[,<列数>])[,<数组名2>(<行数>[,<列数>])… …]
5. 执行程序(调用子程序)命令
DO <程序文献名>
6. 数据库操作命令
CREATE DATABASE <数据库名>
OPEN DATABASE <数据库名> [EXCLUSIVE | SHARED] [NOUPDATE]
CLOSE DATABASES [ALL]
8. 选择工作区、打开表
SELECT <工作区号> | <已打开表的别名>
USE [<表名> [ALIAS <别名>] [EXCLUSIVE | SHARED]]
9. 记录定位
<i>
GO <i>
GOTO <i>
GO TOP
GOTO TOP
GO BOTTOM
GOTO BOTTOM
SKIP [<偏移值体现式>]
函数格式
返回值说明
RECCOUNT([<工作区号> | <"表别名">])
返回记录总数。无参数时返回当前工作区中打开的表的记录总数。如果指定工作区或别名,则返回指定工作区中打开的表的记录总数。
RECNO([<工作区号> | <"表别名">])
返回当前记录号。无参数时返回当前工作区中打开的表的当前记录号。如果指定工作区或别名,则返回指定工作区中打开的表的当前记录号。
BOF([<工作区号> | <"表别名">])
.,表中无记录或从1号记录向前移动记录指针后,.,表示指针已经指向文件开始位置。
EOF([<工作区号> | <"表别名">])
.,表中无记录或从最后一条记录向后移动记录指针后,.,表示指针已经指向文件末尾。
DELETED([<工作区号> | <"表别名">])
.,表中当前记录如果已经逻辑删除,.,.。
FOUND([<工作区号> | <"表别名">])
.,,当前记录指针定位在满足查找条件的记录上。
10. 记录检测函数
11. 浏览数据、修改数据
BROWSE [FIELDS <字段名列表>] [NOEDIT] [TITLE <标题>]
LIST STRUCTURE
LIST [OFF] [记录范围] [FIELDS <字段名列表>] [FOR <逻辑体现式>]
DISPLAY STRUCTURE
DISPLAY [OFF] [记录范围] [FIELDS <字段名列表>] [FOR <逻辑体现式>]
APPEND [BLANK]
INSERT [BLANK] [BEFORE]
REPLACE <替代字段名列表>
替代字段名列表项格式如下:
<字段名> WITH <体现式> [ADDITIVE]
APPEND FROM <表名>
LOCATE FOR <逻辑体现式>
CONTINUE
DELETE [<范围>] [FOR <逻辑体现式>]
RECALL [<范围>] [FOR <逻辑体现式>]
12. 程序构造控制
IF <逻辑体现式> [THEN]
<语句序列>
ENDIF
IF <逻辑体现式> [THEN]
<语句序列1>
ELSE
<语句序列2>
ENDIF
DO CASE
CASE <条件1>
<语句序列1>
[CASE <条件2>
<语句序列2>
… …
CASE <条件n>
<语句序列n>]
[OTHERWISE
<语句序列n+1>]
ENDCASE
DO WHILE <逻辑体现式>
<循环体语句序列>
ENDDO
FOR <循环变量> = <初值> TO <终值> [STEP <增量>]
<循环体>
ENDFOR | NEXT
SCAN [<范围>] [FOR <条件>]
<循环体语句序列>
ENDSCAN
LOOP语句
LOOP与循环配合使用,执行LOOP后将跳过后续循环体语句并立即开始下一次循环。
EXIT语句
退出包含EXIT的最内层循环。