這是很非基本的 foxbase 編程題目, 請說明那裡不明白?
不是替你做所有的題目?  不懂的始終會不懂, 
倒不如用心學會他吧. 明了一切都很容易的.好似 6.1:
STORE .T. TO XDO WHILE XACCE“输入1显示:欢迎使用,输入2显示:再见!”TOA
DO CASE
CASE A=1
?“欢迎使用
STORE .T. TO XCASE A=“2”
?“再见!”
STORE .F. TO XEND CASEEND DO