A-A+

某表单上有两个命令按钮Command1和Command2。要求:(1)若单击Command1

2022-08-05 20:52:27 问答库 阅读 172 次

问题详情

某表单上有两个命令按钮Command1和Command2。要求:(1)若单击Command1命令按钮,程序将当前表的记录指针上移一位,并刷新表单中所有的值;其中,若指针已处于文件的首记录,则将其自身(Command1命令按钮)设置为不能被激活状态。(2)若单击Command2命令按钮,程序将当前表的记录指针下移一位,并刷新表单中所有的值;其中,若指针已处于文件的末记录,则将其自身(Command2命令按钮)设置为不能被激活状态。请帮忙给出正确答案和分析,谢谢!

参考答案

正确答案:编写CommaNd1的Click事件代码如下:ThisForm. Command2. Enabled= .T.SKIP —1IF BOF()GO TOPThis. Enabled=.F.ENDIFThisForm. RefreshCommand2的Click事件代码如下:ThisForm. Command1. Enabled. =.T.SKIPIF EOF()GO BOTTOMThis. Enabled=.F.ENDIFThisForm. Refres
编写CommaNd1的Click事件代码如下:ThisForm. Command2. Enabled= .T.SKIP —1IF BOF()GO TOPThis. Enabled=.F.ENDIFThisForm. RefreshCommand2的Click事件代码如下:ThisForm. Command1. Enabled. =.T.SKIPIF EOF()GO BOTTOMThis. Enabled=.F.ENDIFThisForm. Refres

考点:单击,按钮