你只要把 perform(wm_....); 改为: selectnext(ActiveControl,true,true);
且把form1的keypreview改为true即可。