数据库应用基础(二版)第五章 面向对象程序设计基础 实验5之实验报告.docVIP

四、实验5报告 1．实验过程报告 （1）写出第1题“判断”按钮和“退出”按钮的Click事件代码。 答：“判断”按钮的Click事件代码为： M=VAL(THISFORM.TEXT1.VALUE) IF INT(M/2)=M/2 THISFORM.TEXT2.VALUE=是偶数! ELSE THISFORM.TEXT2.VALUE=是奇数! ENDIF THISFORM.TEXT1.SETFOCUS THISFORM.REFRESH “退出”按钮的Click事件代码为： THISFORM.RELEASE （2）写出第2题表单的Init事件和“确定”按钮的Click事件代码。 答：表单的Init事件代码为： THISFORM.TEXT1.VALUE=0 THISFORM.TEXT2.VALUE=0 THISFORM.TEXT3.VALUE=0 THISFORM.COMMAND1.DEFAULT=.T. THISFORM.TEXT1.SELECTONENTRY=.T. THISFORM.TEXT2.SELECTONENTRY=.T. THISFORM.TEXT3.SELECTONENTRY=.T. “确定”按钮的Click事件代码为： A=THISFORM.TEXT1.VALUE B=THISFORM.TEXT2.VALUE C=THISFORM.