@ ... CLASS 命令示例

下面的例子说明了如何把 @ ... CLASS 同早期 FoxPro 版本中的编程技术结合起来使用（在这个例子中，使用 READ 激活控制）。@ ... CLASS 创建了一个文本框。这个文本框的属性可以用 Visual FoxPro 面向对象的编程技术来改变。

使用 ON KEY LABEL，可以在按 CTRL + I 时显示“窗口颜色” 对话框。用 @ ... CLASS 命令把文本框添加到 Visual FoxPro  主窗口中，然后用 READ 激活文本框。

CLEAR
ON KEY LABEL CTRL+I _SCREEN.PageFrame1.Page1.goFirstName.BackColor;
= GETCOLOR( )
@ 2，2 SAY 'Press Ctrl+I to change the background color'

@ 4，2 CLASS TextBox NAME goFirstName
READ
CLEAR