问答题
某表单上有两个命令按钮Command1和Command2。要求：(1)若单击Command1命令按钮，程序将当前表的记录指针上移一位，并刷新表单中所有的值；其中，若指针已处于文件的首记录，则将其自身(Command1命令按钮)设置为不能被激活状态。(2)若单击Command2命令按钮，程序将当前表的记录指针下移一位，并刷新表单中所有的值；其中，若指针已处于文件的末记录，则将其自身(Command2命令按钮)设置为不能被激活状态。
【正确答案】
【答案解析】编写CommaNd1的Click事件代码如下：
ThisForm. Command2. Enabled= .T.
SKIP —1
IF BOF()
GO TOP
This. Enabled=.F.
ENDIF
ThisForm. Refresh
Command2的Click事件代码如下：
ThisForm. Command1. Enabled. =.T.
SKIP
IF EOF()
GO BOTTOM
This. Enabled＝.F.
ENDIF
ThisForm. Refresh