以下是引用bccn201203在2012-9-25 00:38:45的发言:
*- 02 - 身份证发放地验证
SELECT * FROM XQMC WHERE 县区代码==LEFT(SFZH,6) INTO CURSOR SFZ
IF RECCOUNT([SFZ])=0
MESSAGEBOX([未查到该身份证发放地代码],64,[系统信息])
RETURN
ELSE
MESSAGEBOX([该身份证发放地:]+CHRTRANC(省+IIF(INLIST(ALLTRIM(市),[市辖区],[县]),[],市)+县+[(]+县区代码+[)],[ ],[]),64,[系统信息])
ENDIF
USE IN ([SFZ])
就是前面的界面
哥哥 明天继续搞 我休息了啊 晚安。