|
本帖最后由 mrlgs 于 2016-2-6 09:48 编辑
我做了一个if判断函数,源代码如下
Define myif(exp1,str1,str2)=
Func
:If exp1=true Then
:Return str1
:Else
:Return str2
:EndIf
:EndFunc
调用如下
Disp myif(a1=1,myif(a5>0.008,a5,0.008),myif(a1=2,myif(a5>0.006,a5,0.006),myif(a1=3 or a1=4,myif(a5>0.004,a5,0.004),"非法数据")))
大致的意思是a1单元有1,2,3,4四种情况的数值,
如果a1等于1,判断a5的值是否大于0.008,如果大于0.008,取a5的值,否则取0.008,
当a1等于2,判断a5的值是否大于0.006,如果大于0.006,取a5的值,否则取0.006,
当a1等于3或4,判断a5的值是否大于0.004,如果大于0.004,取a5的值,否则取0.004,
如果a1不等于上述数值,输出“非法数据”
运行的时候显示
参数输错了,这开发环境,真是别扭啊,必须很仔细才行
|
|