分享一個自寫自用的用戶宏清空程序（單獨清空）

wx_9869788484

[img][/img]

1426437527

謝謝樓主分享

木子李

留個記號

VYF0412

宏程序一直那么高深莫測

feng1990

謝謝大師分享

wx_9869788484

wx_9869788484 發表于 2021-12-27 00:30
8 p8 o' [2 _* @: L%
O0700
; p. ^; H( z' s+ m1 v' O9 U4 W#1=500. （開始）

) B! V2 V0 s) {; q' [  P# Y腦發圖有限制，手機被我女兒摔壞了還沒修好 后補文字，請版主大人和管理員大人見諒！抱歉！！！

wx_9869788484

%
0 S3 a6 y4 U. I- Q1 C# D7 `O0700
3 d7 C% D3 S' U8 h' |. R( S#1=500. （開始）
+ a3 H3 c7 G% m2 k( H; U（開始和結束請按自己需求取數）
（個人建議：
500-999用戶宏變量   11001-11400刀具長度補償H  10001-10400刀具長度磨損補償
            13001- 13400 刀具直徑補償D  12001-12400刀具直徑磨損補償）

1 h% [3 u  @) \' g9 y6 W#2=999. （結束）
' X& S/ Q3 @/ I0 n#3=#0  （#0/自然數）
（注意此變量取數 #500-#999時為#0 即數據空   刀具補償時需取自然數）
N100
4 d$ o! x; a' E. oIF[#1GT#2]GOTO101
$ a6 c" d& _6 l  F3 P#4=#1
#[#1]=#3
# j: y8 T9 D) i9 |5 q4 I#1=#4+1
% `& ]- A& P8 F' Y9 D$ }# aGOTO100
. W* D5 |, q5 f1 o8 x$ V  A8 u  s* ~N101
) c' ]$ w5 V" Q4 f+ v" ^0 D1 hM30
%