浙江财经学院VFP上机考试答案完整版[1.docVIP

表单设计 设计标准化模拟考试表单。 表单Form1的Init事件： Thisform.Optiongroup1.Value=0 Optiongroup1的Click事件 IF This.Value=2 MessageBox(答对了,真棒！,0+48,评判结果） Else MessageBox(答错了,再试！,0+32,评判结果) ENDIF 编制一个表单完成表文件学生.dbf 命令按钮Command1的Click事件 GO TOP Thisform.Command1.Enabled=.F. Thisform.Command2.Enabled=.F. Thisform.Command3.Enabled=.T. Thisform.Command4.Enabled=.T. Thisform.Refresh (2) Command2的Click事件 SKIP -1 IF BOF() Thisform.Command1.Enabled=.F. Thisform.Command2.Enabled=.F. ELSE Thisform.Command