嘉定都市网
标题:
看看，这程序那里错了
[打印本页]
作者:
兔崽子
时间:
2002-11-12 21:15
标题:
看看，这程序那里错了
着是我编的查询程序：
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 23:33
test1存不存在啊
作者:
兔崽子
时间:
2002-11-13 18:51
我知道哪里有错了！
作者:
dragonfly
时间:
2002-11-13 19:40
foxpro拐倒......
作者:
雪浪
时间:
2002-11-14 11:34
啊里
作者:
ilsem
时间:
2002-11-14 11:40
扑通~~当年我也是foxpro高手啊~~现在都忘了
作者:
兔崽子
时间:
2002-11-14 13:36
INPUT不能用的！应该是ACCEPT才对！呵呵后
欢迎光临 嘉定都市网 (http://www.jiading.com.cn/)
Powered by Discuz! X3.1
我知道哪里有错了！