谁有兴趣执行下面的代码?

程序代码:
Clear
Set Delete on && 更改此设置,再执行一次看看结果 :)
Set Exact Off
Set Ansi Off
Create Table TestTable (pk I Autoinc, Sometext C(20))
Insert Into TestTable (Sometext) Values ("One")
Insert Into TestTable (Sometext) Values ("Two")
Insert Into TestTable (Sometext) Values ("Three")
= Sys(3054,1)
Select Sometext, pk From TestTable Where Upper(Sometext) = "ONE" into cursor crsResult
?
Select TestTable
Index on Upper(Sometext) tag Sometext
Set Order To
Select Sometext, pk From TestTable Where Upper(Sometext) = "ONE" into cursor crsResult
?
Select TestTable
Index on Deleted() tag deleted
Set Order To
Select Sometext, pk From TestTable Where Upper(Sometext) = "ONE" into cursor crsResult