回复 29楼 sdta
版主该发表一下建议了
个性太多,无法显示
T1=SECONDS() CLEAR cstr=" how often[]多久一次 exercise['eks2saiz]v.&n.锻炼;运动 skateboard[]v.踩滑板;参加滑板运动 hardly['ha:dli]adv. 几乎不;几乎没有 ever['ev2]adv. 曾;曾经 shop[60p]v.购物 once[w3ns]adv. 一次" CREATE CURSOR taba (单词 C(20),音标 C(20),汉意 C(30)) NSTR=LENC(CSTR) LOCAL AA(3),A1 STORE [] TO AA,A1 FOR I=1 TO NSTR A1=A1+SUBSTRC(CSTR,I,1) IF (LEN(LEFTC(RIGHTC(A1,2),1))=2 AND EMPTY(RIGHTC(RIGHTC(A1,2),1))) OR I=NSTR A1=ALLTRIM(A1) AA(1)=SUBSTR(A1,1,AT("[",A1)-1) AA(3)=RIGHTC(A1,LEN(A1)-LENC(A1)) AA(2)=SUBSTR(A1,AT("[",A1),LEN(A1)-LEN(AA(1))-LEN(AA(3))) INSERT INTO TABA FROM ARRAY AA A1=[] ENDIF ENDFOR MESSAGEBOX([查询时间:]+TRANSFORM((SECONDS()-T1)*1000)+[毫秒]) BROWSE