您所在位置：主题：新手請大師看看我這段代碼出了什麼問題!
msly
[专家分：0] 发布于 2010-02-05 12:26:00
[size=3]sele jxcgong
use f:\jin\yiseng\data\jxcgong
private msbox,n,w
w=alltrim(thisform.編號1.value)
n=null
msbox='無編號請重新輸入!'
if w==n then
wait window msbox timeout 2
else
append blank
goto bottom
thisform.refresh[/size]
use f:\jin\yiseng\data\jxcgong
private msbox,n,w
w=alltrim(thisform.編號1.value)
n=null
msbox='無編號請重新輸入!'
if w==n then
wait window msbox timeout 2
else
append blank
goto bottom
thisform.refresh[/size]
