给出窗体单击事件过程:PRIVATE SUB FORM_CLICK()DIM A AS INTEGER A =VAL(INPUTBOX("PLEASE I
给出窗体单击事件过程:
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时,消息框显示的内容分别是【 】。