G E T E X P R 命 令

G E T E X P R 命 令 - 图1G E T E X P R 命 令 - 图2显示表达式生成器对话框 从中可以创建表达式并把此表达式存储在变量或数组元素中

语 法

GETEXPR [ cCaptionTex t] TO MemVarName [TYPE cExpressionType [; cErrorMessageTex t]] [DEFAULT cDefaultExpression ]

参 数 描 述

cCaptionText

G E T E X P R 命 令 - 图3G E T E X P R 命 令 - 图4G E T E X P R 命 令 - 图5G E T E X P R 命 令 - 图6指 定 在 表 达 式 生 成 器 中 显 示 的 标 题 该 标 题 可 提 示 用 户 生 成 何 种 类 型 的表 达 式

TO MemVarName

G E T E X P R 命 令 - 图7G E T E X P R 命 令 - 图8G E T E X P R 命 令 - 图9G E T E X P R 命 令 - 图10指 定 存 储 表 达 式 的 变 量 或 数 组 元 素 如 果 此 变 量 不 存 在 V isual FoxPro 将 创建 该 变 量 GETEXPR 命 令 不 创 建 数 组 元 素

G E T E X P R 命 令 - 图11G E T E X P R 命 令 - 图12G E T E X P R 命 令 - 图13G E T E X P R 命 令 - 图14G E T E X P R 命 令 - 图15G E T E X P R 命 令 - 图16G E T E X P R 命 令 - 图17如果按 ESC 键或选择 取消 按钮退出 表达式生成器 将在变量或数组元素中存储空字符串 如果已经用 DEFAULT 子句创建了某个默认表达式 在按 ESC 键或选择

G E T E X P R 命 令 - 图18G E T E X P R 命 令 - 图19G E T E X P R 命 令 - 图20G E T E X P R 命 令 - 图21G E T E X P R 命 令 - 图22G E T E X P R 命 令 - 图23取消 按钮退出 表达式生成器 时 将把这个默认表达式存储在变量中 .

TYPE cExpressionType [; cErrorMessageTex t]

G E T E X P R 命 令 - 图24G E T E X P R 命 令 - 图25指 定 表 达 式 类 型 下 表 列 出 了 在 cExpressionType 中 用 于 指 定 各 表 达 式 类 型 的 字符

cExpression Type

表 达 式 类 型

  1. 字符型

  2. 日期型

T 日期时间型

N 数值型

F 浮点型

I 整型

B 双精度型

Y 货币型

L 逻辑值

G E T E X P R 命 令 - 图26G E T E X P R 命 令 - 图27G E T E X P R 命 令 - 图28G E T E X P R 命 令 - 图29G E T E X P R 命 令 - 图30G E T E X P R 命 令 - 图31G E T E X P R 命 令 - 图32G E T E X P R 命 令 - 图33可以指定当表达式无效时显示的错误信息 cErrorMessageText 如果同时包含cErrorMessageText 和 cExpressionType 应该用分号 将它们分隔开cExpressionType 分号以及 cErrorMessageText 的组合应该用成对的单引号或双引号括起来

DEFAULT cDefaultExpression

G E T E X P R 命 令 - 图34G E T E X P R 命 令 - 图35G E T E X P R 命 令 - 图36G E T E X P R 命 令 - 图37G E T E X P R 命 令 - 图38G E T E X P R 命 令 - 图39G E T E X P R 命 令 - 图40G E T E X P R 命 令 - 图41G E T E X P R 命 令 - 图42G E T E X P R 命 令 - 图43指 定 在 表 达 式 生 成 器 中 显 示 初 始 的 默 认 表 达 式 可 以 接 受 这 个 默 认 表 达式 或 用 cDefaultExpression 指 定 的 表 达 式 改 写 它 如 果 按 ESC 键 或 选 择 取消 按 钮 退 出 表 达 式 生 成 器 cDefaultExpression 的 值 将 存 储 在 变 量 或 数

G E T E X P R 命 令 - 图44组 元 素 中

示 例

G E T E X P R 命 令 - 图45G E T E X P R 命 令 - 图46G E T E X P R 命 令 - 图47G E T E X P R 命 令 - 图48下面的示例将显示 表达式生成器 提示您输入相应的 内容

CLOSE DATABASES

OPEN DATABASE (HOME(2) + 'Data\testdata') USE customer && 打开 Customer 表

GETEXPR 'Enter condition to locate ' TO gcTemp;

TYPE 'L' DEFAULT 'COMPANY = ""'

LOCATE FOR &gcTemp IF FOUND()

DISPLAY

ELSE

? 'Condition ' + gcTemp + ' was not found ' ENDIF

请 参 阅

_GETEXPR, GETFILE(), GETPICT(), LOCFILE(), PUTFILE()