亚洲欧洲国产欧美一区精品,激情五月亚洲色五月,最新精品国偷自产在线婷婷,欧美婷婷丁香五月天社区

　　7.輸入命令 ACCEPT

　　【格式】ACCEPT [<提示信息>] TO <內(nèi)存變量>

　　【功能】在程序執(zhí)行過程中，將用戶交互式輸入的內(nèi)容作為字符串賦值給指定內(nèi)存變量。該命令只接受字符型數(shù)據(jù)，輸入的字符串不需要加定界符

　　注意：

　　(1)如果選用<字符表達(dá)式>，那么系統(tǒng)會首先顯示該表達(dá)式的值，作為提示信息。

　　(2)該命令只能接收字符串。在輸入字符串時不需要加定界符。

　　(3)如果不輸入任何內(nèi)容直接按回車。系統(tǒng)會把空串賦給指定的內(nèi)存變量。

　　【例1】輸入“平衡”到XM 變量中。

　　ACCEPT ”請輸入教師姓名：” TO XM

　　請輸入教師姓名：平衡

　　? XM

　　平衡

　　【例2】編程從鍵盤輸入某數(shù)據(jù)庫的文件名，要求打開該數(shù)據(jù)庫并顯示

　　其內(nèi)容。程序文件名為 PA1.PRG。

　　MODI COMMAND PA1

　　SET TALK OFF

　　CLEAR

　　ACCEPT "請輸入數(shù)據(jù)庫名：" TO A

　　OPEN DATABASE &&A

　　ACCEPT "請輸入表名：" TO B

　　USE &&B

　　LIST

　　USE

　　SET TALK ON

　　RETURN

　　8.WAIT 命令

　　【格式】WAIT [<提示信息>][TO<內(nèi)存變量>] [WINDOW [AT<行>,<列>]] [NOWAIT] [CLEAR|NOCLEAR] [TIMEOUT<數(shù)值表達(dá)式>]

　　【功能】顯示提示信息，暫停程序執(zhí)行，直到用戶按任意鍵或單擊鼠標(biāo)時繼續(xù)執(zhí)行程序。

　　若選擇可選項(xiàng)[TO <內(nèi)存變量>]，將輸入的單個字符作為字符型數(shù)據(jù)賦給指定的<內(nèi)存變量>;若用戶是按Enter 鍵或單擊鼠標(biāo)，<內(nèi)存變量>的值為空串。

　　若省略所有可選項(xiàng)，屏幕顯示“鍵入任意鍵繼續(xù)……”默認(rèn)提示信息 。

　　【例】在STUDENT 數(shù)據(jù)庫的STUD 表中顯示任意一個系學(xué)生的情況。

　　程序文件

　　名為PA2.PRG

　　SET TALK OFF

　　CLEAR

　　OPEN DATABASE 學(xué)生管理

　　USE 學(xué)生

　　WAIT "請輸入待查學(xué)生的學(xué)號(1-3)：" TO N

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

　　WAIT "輸入無效，結(jié)束程序運(yùn)行!" WINDOW TIMEOUT 5

　　RETURN

　　ELSE

　　STORE "0"+N TO AAA

　　LIST FOR 學(xué)號=AAA

　　ENDIF

　　CLOSE DATABASE

　　SET TALK ON

　　RETURN