If !Empty(Thisform.text2.Value)
Select * From UU Where Alltrim(Thisform.text2.Value) $ Alltrim(pc) Order By pkspc Into Cursor pk Readwrite
Local lt
lt="#$%"
Scan
If pc=lt
Repl pc With ""
Else
lt=pc
Endi
Endscan
Locate
Thisform.grid1.RecordSource = "pk"
Thisform.text2.SetFocus
Thisform.Refresh
Endif

1第一处红色的是什么意思?

2当没用第二处红色地方代码后的效果是指针指向最后一条记录,用了Locate就指向第一条记录,是不是Locate的作用和go top的作用类似?

[此贴子已经被作者于2007-6-13 15:33:41编辑过]

其中UU为表名,PC 为字段名
实现的效果为
PC S1 S2 S3
1 2 2 2
1 2 4 5
1 2 1 2
8 4 2 2
8 2 2 2
. . . .
. . . .
. . . .
其中红色的不显示

运行结果完全正确！

我知道代码是没错的,我想知道那是什么意思?

LOCATE=go top

我猜也是的,那这是又是什么意思来的?" lt="#$%" "

songyuyu:
不会吧，这也是问题？
用单引号，双引号，方括弧引起来的是什么？

我想知道这个 #$% 的作用

没有看到整个程序，也不知道作者的思路，只是猜测。
虽然他们也是运算符，引起来就是字符串。你换其他字符试试结果如何？

那就是整个查询程序来的.
当换成lt=""
PC S1 S2 S3
1 2 2 2
8 4 2 2
. . . .
. . . .
. . . .
换成lt="#"
换成lt="%"
结果还是正常