📄 项目赋名称.prg
字号:
***给队员初始.dbf的项目1-项目5赋上项目名称 最后编缉 张冰
***set path to c:\zbydhxt
use 队员初始.dbf in 0 alias e1
use 项目初始.dbf in 0 alias e2
sele e2
go 1
do while .not.eof()
xmdm=项目代码
xmmc=项目名称
skip
sele e1
go 1
*!* xmmcc=项目11
*!* if empty(xmmcc)<>.T.
do while .not.eof()
xm1=项目1
xm2=项目2
xm3=项目3
xm4=项目4
xm5=项目5
if xm1=xmdm
repl 项目11 with xmmc
endif
if xm2=xmdm
repl 项目22 with xmmc
endif
if xm3=xmdm
repl 项目33 with xmmc
endif
if xm4=xmdm
repl 项目44 with xmmc
endif
if xm5=xmdm
repl 项目55 with xmmc
endif
skip
enddo
sele e2
enddo
sele e1
use
sele e2
use
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -