7.输入命令 ACCEPT

　　【格式】ACCEPT [<提示信息>] TO <内存变量>

　　【功能】在程序执行过程中，将用户交互式输入的内容作为字符串赋值给指定内存变量。该命令只接受字符型数据，输入的字符串不需要加定界符

　　注意：

　　(1)如果选用<字符表达式>，那么系统会首先显示该表达式的值，作为提示信息。

　　(2)该命令只能接收字符串。在输入字符串时不需要加定界符。

　　(3)如果不输入任何内容直接按回车。系统会把空串赋给指定的内存变量。

　　【例1】输入“平衡”到XM 变量中。

　　ACCEPT ”请输入教师姓名：” TO XM

　　请输入教师姓名：平衡

　　? XM

　　平衡

　　【例2】编程从键盘输入某数据库的文件名，要求打开该数据库并显示

　　其内容。程序文件名为 PA1.PRG。

　　MODI COMMAND PA1

　　SET TALK OFF

　　CLEAR

　　ACCEPT "请输入数据库名：" TO A

　　OPEN DATABASE &&A

　　ACCEPT "请输入表名：" TO B

　　USE &&B

　　LIST

　　USE

　　SET TALK ON

　　RETURN

　　8.WAIT 命令

　　【格式】WAIT [<提示信息>][TO<内存变量>] [WINDOW [AT<行>,<列>]] [NOWAIT] [CLEAR|NOCLEAR] [TIMEOUT<数值表达式>]

　　【功能】显示提示信息，暂停程序执行，直到用户按任意键或单击鼠标时继续执行程序。

　　若选择可选项[TO <内存变量>]，将输入的单个字符作为字符型数据赋给指定的<内存变量>;若用户是按Enter 键或单击鼠标，<内存变量>的值为空串。

　　若省略所有可选项，屏幕显示“键入任意键继续……”默认提示信息 。

　　【例】在STUDENT 数据库的STUD 表中显示任意一个系学生的情况。

　　程序文件

　　名为PA2.PRG

　　SET TALK OFF

　　CLEAR

　　OPEN DATABASE 学生管理

　　USE 学生

　　WAIT "请输入待查学生的学号(1-3)：" TO N

　　IF VAL(N)<1 .OR. VAL(N)>3

　　WAIT "输入无效，结束程序运行!" WINDOW TIMEOUT 5

　　RETURN

　　ELSE

　　STORE "0"+N TO AAA

　　LIST FOR 学号=AAA

　　ENDIF

　　CLOSE DATABASE

　　SET TALK ON

　　RETURN