行业应用

开发平台：

VFP

DWMC.PRG：源码内容

							use dw
@ 5,8 say '原单位名称:'
@ 6,4 say mc
@ 8,8 say '请输入新单位名称:'
@ 9,4 get mc
read
pack
Rdwmc=mc
use
set colo to w+/n
@ 1,1,22,78 box'鞍鞍鞍鞍鞍鞍鞍'
retu

						