【程序说明】 模糊查询用户指定表文件中指定字段(字符型)的指定内容，如果用户指定的表文件不存在，给予提示信息。

【程序】

SET TALK OFF

CLEAR

ACCEPT“请输入表文件名(带扩展名)：” TO FILENAME

ACCEPT“请输入要查询的字段名(字符型)：” TO FIELDNAME

ACCEPT“请输入要查询的内容(字符串)：”TO CHAR

IF (9)

(10)

BROWSE FOR (11)

USE

(12)

?“指定的表文件不存在!”

ENDIF

SET TALK ON

(9)

A．PILE(FILENAME)

B．TYPE(“& FILENAME”)

C．FILE(“FILENAME”)

D．FILE(& FILENAME)