B O F 函数

B O F 函数 - 图3 确定当前记录指针是否在表头

语法

BOF([ n W orkArea | cTableAlias ])

返值类型逻辑值 参数描述

n W o rkArea

B O F 函数 - 图4 指定在非当前工作区中打开的表所在的工作区号

cTableAlias

B O F 函数 - 图5 指定在非当前工作区中打开的表别名

B O F 函数 - 图6 B O F 函数 - 图7 B O F 函数 - 图8 B O F 函数 - 图9 B O F 函数 - 图10 B O F 函数 - 图11 B O F 函数 - 图12 B O F 函数 - 图13 如果受测试的表在非当前选定工作区中打开那么使用这些可选的参数为表指定别名或所在的工作区号若此表未在指定的工作区中打开则 BOF 返回假 (.F.)

说明

B O F 函数 - 图14 B O F 函数 - 图15 B O F 函数 - 图16 B O F 函数 - 图17 B O F 函数 - 图18 B O F 函数 - 图19 B O F 函数 - 图20 B O F 函数 - 图21 B O F 函数 - 图22 BOF 函数可用来测试一个表的记录指针是否已到文件头如果用户试图将记录指针移动到表的第一条记录之前则 BOF 返回真 ( .T.)

示例

B O F 函数 - 图23 B O F 函数 - 图24 B O F 函数 - 图25 B O F 函数 - 图26 B O F 函数 - 图27 B O F 函数 - 图28 B O F 函数 - 图29 以下示例打开了 customer 表并一次在一页上列出了公司 (Company) 名称以表中的最后一个记录开始继续列表直到到达文件的开头或您选择了取消

CLOSE DATABASES

CLEAR

OPEN DATABASE (HOME() + “samples\data\testdata ”) USE customer

GO BOTTOM

local recCtr, btnValue

recCtr = 0

btnValue = 1

DO WHILE btnValue = 1 AND NOT BOF()

? “Company : “ + company recCtr = recCtr + 1

if (recCtr % 20) = 0 then

B O F 函数 - 图30 B O F 函数 - 图31 B O F 函数 - 图32 B O F 函数 - 图33 B O F 函数 - 图34 B O F 函数 - 图35 B O F 函数 - 图36 B O F 函数 - 图37 btnValue =MESSAGEBOX ( “ 单击确定继续取消退出 33 ) clear

endif

Skip -1 && 上移一个记录

ENDDO

=MESSAGEBOX (“Listing complete.”,48)

请参阅

EO F ( )

B O F 函 数

B O F 函 数

B O F 函数

B O F 函数