VFP 愛用者社區

[zqgs]

DO WHIL .T.
rkStr=""
rkStr=Fread(Fp,4)
*定义入库批次 入库毛重 速度
Stor 0 to Rk_Mz,Rk_Sd
DataJs=Datajs+1
Rk_mz=val(Str(val(Subs(Rkstr,87,6)),5,1))
Rk_Sd=val(Subs(RkStr,120,4))
SjGdhdata(datajs)=rk_mz
SjGdhsd(datajs)=rk_sd

[elleryq]

對不起 ---> Sorry
你想問什麼呢?? --> What is your question??

這邊看到亂碼 --> We see strange code here.
你可以下載 ConvertZ 去轉碼 --> you can download "ConvertZ" to convert GB code to Big5 code.

Thanks.

[catjoke]

where is "End Do"

What condition exit DO WHILE .T. Loop!??!?!

否則它會進到死胡同中, 走不出來!!

e.g.

DO WHILE .T.

IF 3>2
EXIT DO
ENDIF
ENDDO