给出窗体单击事件过程： PRIVATE SUB FORM_CLICK( ) DIM A AS INTEGER A =VAL( INPUTBOX( "PLEASE INPUT A NUMBER" )) SELECT CASE A MOD 5 CASE IS＜4 W=A+10 CASE IS＜2 W=A.2 CASE ELSE W=A-10 END SELECT MSGBOX W END SUB 当运行程序后，设输入的数据分别为14、3、125、21时，消息框显示的内容分别是 1。