如题所述
设置表ï¼å¯ç 表ï¼éé¢æ·»å å段ç¨æ·ååå¯ç ç¨äºä½ åå¨å¯ç åç¨æ·åçï¼æ°å»ºè¡¨åè°ç¨æ°æ®ç¯å¢æ·»å å¯ç 表ï¼æ·»å çªä½æ§ä»¶combo1ãtext1ãspinner1ãcommand1ï¼å¹¶å¨command1çclickè¿ç¨å å
¥å½ä»¤ï¼locate all for alltrim(å¯ç 表.ç¨æ·å)=alltrim(thisform.combo1.value)
if found()
if alltrim(thisform.text1.value)==alltrim(å¯ç 表.å¯ç )
do form ä½ ç表å
thisform.release
else
thisform.spinner1.value=thisform.spinner1.value+1
if thisform.spinner1.value=3
messagebox("对ä¸èµ·å£ä»¤ä¸æ£ç¡®ï¼"+chr(13)+"对ä¸èµ·ï¼ä½ æ æ使ç¨ï¼",48,"ç»å ¥ä¿¡æ¯")
thisform.release
quit
endif
messagebox("å¯ç é误ï¼è¯·éæ°è¾å ¥ï¼",48,"ç»å ¥ä¿¡æ¯")
thisform.text1.setfocus
thisform.text1.value=""
thisform.refresh
endif
endif
if found()
if alltrim(thisform.text1.value)==alltrim(å¯ç 表.å¯ç )
do form ä½ ç表å
thisform.release
else
thisform.spinner1.value=thisform.spinner1.value+1
if thisform.spinner1.value=3
messagebox("对ä¸èµ·å£ä»¤ä¸æ£ç¡®ï¼"+chr(13)+"对ä¸èµ·ï¼ä½ æ æ使ç¨ï¼",48,"ç»å ¥ä¿¡æ¯")
thisform.release
quit
endif
messagebox("å¯ç é误ï¼è¯·éæ°è¾å ¥ï¼",48,"ç»å ¥ä¿¡æ¯")
thisform.text1.setfocus
thisform.text1.value=""
thisform.refresh
endif
endif
温馨提示:答案为网友推荐,仅供参考