Q2:如果使用选择语句,不符合条件时,返回上一界面重新输入应该怎样做?
Q3:如何修改%window中某行的字符大小?
下面是自己编的程序,但是运行不了╥﹏╥... ,求解答:
- %macro win;
- %window a
- #1 @ 24 "请输入选项"
- #3 @ 24 "1.a"
- #5 @ 24 "2.b"
- #9 @ 13 xx 3 attr=underline
- #11 @ 24 "请输入数值"
- #13 @ 13 xx 10 attr=underline
- #20 @ 50 "回车继续 -->>";
- %display a;
- %mend win;
- %macro ch;
- %win;
- %if &sz<10 %then %do;
- %window ERROR
- #2 @34 "ERROR:请输入正确的sz!"
- %display error;
- %end;
- %if &xx=1 %then %do;
- y=%eval(&sz*3);
- %end;
- %if &xx=2 %then %do;
- y=%eval(&sz*+1);
- %end;
- put y=;
- %mend ch;
- %ch;