|
|
马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。
您需要 登录 才可以下载或查看，没有帐号？注册
x
着是我编的查询程序：
SET TALK OFF
CLEAR
SET PROC TO 1
USE TEST1 INDEX TEST1IND
DEFI WIND SGTZW FROM 10,15 TO 20,65 TITL \"查找结果\"
AA=\"Y\"
DO WHILE AA=\"Y\"
INPUT \"XH:\" TO XHH
#SEEK XHH
IF FOUND()
DO 11
ELSE
INPUT \"姓名:\" TO XMM
#LOCATE ALL FOR XM=XMM
IF FOUND()
DO 11
ELSE
WAIT \"查无!\"
ENDIF
ENDIF
WAIT \"是否继续[Y/N]?\" TO AA
ENDDO
子程序：
PROC 11
ACTI WIND SGTZW
@ 1,2 SAY \"姓名:\" PICT \"XXXXXXXX\"
@ 1,22 SAY \"学号:\" PICT \"XXXXXX\"
@ 3,2 SAY \"身高:\" PICT \"XXXXXX\"
@ 3,22 SAY \"体重:\" PICT \"XXXXXX\"
RETURN
#号这是有问题的地方！我怎么看都看不出是哪里错！！！！昏！！！！ |
|
|
|
|
|
|
|
|
|
发表于 2002-11-12 21:15:31
QQ好友和群
QQ空间
腾讯微博
腾讯朋友
收藏
转播
淘帖
支持
反对
变色卡
楼主
我知道哪里有错了！
