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
. . . .
. . . .
. . . .
其中红色的不显示

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

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

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

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

程序是我从别的地方看来的.
楼上的 Tiger5392 说得非常清楚
谢谢 各位朋友的解释,我明白了