万网独立域名管理:Visual FoxPro中@是什么意思?

来源:百度文库 编辑:高校问答 时间:2024/03/29 14:01:47
set talk off
set safe off
set color to 0/7*,6+/4
use gzzu1.dbf
index on dm to gzzu1
do while .t.
clea
dma=' '
@2,3 say '请输入人员代码(输0000退出):'get dma
read moda
if empt(dma)
loop
endi
if dma='0000'
exit
endif
seek dma
if .not. found()
@6,8 say '查无此人!'
@9,20 say '按任一键继续!'
=inke(0,"m")
@6,8 clea
loop
else
@ 6,20 clea
@6,20 say '检索并显示'
@7,18 say '_____________'
@8,20 say '代 码: '+dm
@9,20 say '姓 名: '+xm
@10,20 say '部 门 :'+bm
@11,20 say '基本工资:'+str(jbgz,8,2)
@12,20 say '附加工资:'+str(fjgz,8,2)
@13,20 say '房 费:'+str(ff,8,2)
@16,20 say '按任一键继续!'
=inke(0,"m")
@ 6,20 clea
endif
enddo
retu
@的具体作用是什么?现在VFP6.0是不是已经不用了

这是foxpro2.0/3.0时的程序,是面向程序的编程
下面说明几个
@6,8 say '查无此人!' **在第六行第八个字符处显示"查无此人"
@9,20 say '按任一键继续!' **在第九行第20个字符处显示"按任一键
=inke(0,"m")
@6,8 clea **从第六行第八个字符处清除此行
loop
else
@ 6,20 clea **清除
@6,20 say '检索并显示' **显示
@7,18 say '_____________'

VFP是面向对象的,编程方法与思路都不一样了

@......say....命令完全是向下兼容vf的早期版本,请使用label标签.foxpro的早期版本不是面向对象的编程.

VFP中@表示定点的意思,其后一般带一个坐标值用来表示将光标置于行、列位置。如
@ 5,6--表示将光标置于第5行第6列。
在VFP6中还可以用@。