vbæå
æ 移å°ææ¬æ¡ä¸ï¼åªéè¦è®©è¿ä¸ªææ¬æ¡è·åç¦ç¹å°±å¯ä»¥ã
è·åç¦ç¹ä½¿ç¨SetFocuså½æ°ã
SetFocus åè½ï¼å¯¹æå®ççªå£è®¾ç½®é®çç¦ç¹
å½æ°ååï¼HWND SetFocusï¼HWND hWndï¼ã
åæ°ï¼hWndæ¥æ¶é®çè¾å
¥ççªå£æéãè¥è¯¥åæ°ä¸ºNULLï¼åå»é®è¢«å¿½ç¥ã
ä¾åï¼
å½text1ä¸è¾å
¥çæ°åè¶
è¿6个çæ¶åï¼ç¦ç¹èªå¨è½¬ç§»å°text2ææ¬æ¡
Private Sub Text1_Change()
If Len(Text1.Text) > 6 Then Text2.SetFocus
End Sub
温馨提示:答案为网友推荐,仅供参考