Form Init 事件:
Puble lTag
lTag = .T.
sele viewA
inde on 编号 tag 编号
inde on 编号 tag 编号1 desc
inde on 年龄 tag 年龄
inde on 年龄 tag 年龄1 desc
inde on 工资 tag 工资
inde on 工资 tag 工资1 desc
set orde to 1
loca
Grid 的 Column1(编号)的 Header1 的 Click 事件:
if lTag
lTag = .F.
set orde to tag 编号1
else
lTag = .T.
set orde to tag 编号
endi
loca
ThisForm.Refresh()