避免多个判断

Snowdreams

验证文件完整性时，有没有更好的办法？我想尽量避免多个判断循环，代码如下。

  

窗口程序集名	保 留	保 留	备 注
启动子程序程序集

子程序名	返回值类型	公开	备 注
_启动子程序	整数型

调试输出 (子程序_避免多个判断 ())
返回 (0)

子程序名	返回值类型	公开	备 注
子程序_避免多个判断	整数型

变量名	类 型	静态	数组	备 注
验证	整数型			判断两个txt文件是否存在，1表示都存在，0表示都没有。2表示缺失test1.txt，3表示缺失test2.txt。
test1	逻辑型			test1.txt。
test2	逻辑型			test2.txt。
runDir	文本型			运行目录。
测试文件	文本型		2

' 检查文件完整性
runDir ＝ 取运行目录 ()
加入成员 (测试文件, “test1.txt”)
加入成员 (测试文件, “test2.txt”)
test1 ＝ 文件是否存在 (runDir ＋ 测试文件 [1])
test2 ＝ 文件是否存在 (runDir ＋ 测试文件 [2])
判断 (test1 ＝ 真 且 test2 ＝ 真)
验证 ＝ 1
判断 (test1 ＝ 假 且 test2 ＝ 假)
验证 ＝ 0
判断 (test1 ＝ 假 且 test2 ＝ 真)
验证 ＝ 2
判断 (test1 ＝ 真 且 test2 ＝ 假)
验证 ＝ 3


返回 (验证)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 启动子程序程序集<br /> <br /> .子程序 _启动子程序, 整数型<br /> <br /> 调试输出 (子程序_避免多个判断 ())<br /> 返回 (0)<br /> <br /> .子程序 子程序_避免多个判断, 整数型<br /> .局部变量 验证, 整数型, , , 判断两个txt文件是否存在，1表示都存在，0表示都没有。2表示缺失test1.txt，3表示缺失test2.txt。<br /> .局部变量 test1, 逻辑型, , , test1.txt。<br /> .局部变量 test2, 逻辑型, , , test2.txt。<br /> .局部变量 runDir, 文本型, , , 运行目录。<br /> .局部变量 测试文件, 文本型, , "2"<br /> <br /> ' 检查文件完整性<br /> runDir ＝ 取运行目录 ()<br /> 加入成员 (测试文件, “test1.txt”)<br /> 加入成员 (测试文件, “test2.txt”)<br /> test1 ＝ 文件是否存在 (runDir ＋ 测试文件 [1])<br /> test2 ＝ 文件是否存在 (runDir ＋ 测试文件 [2])<br /> .判断开始 (test1 ＝ 真 且 test2 ＝ 真)<br />     验证 ＝ 1<br /> .判断 (test1 ＝ 假 且 test2 ＝ 假)<br />     验证 ＝ 0<br /> .判断 (test1 ＝ 假 且 test2 ＝ 真)<br />     验证 ＝ 2<br /> .判断 (test1 ＝ 真 且 test2 ＝ 假)<br />     验证 ＝ 3<br /> .默认<br /> <br /> .判断结束<br /> 返回 (验证)

无叶

白天很傻很天真

把判断 改成如果 ， 这样就避免使用判断了

Snowdreams

白天很傻很天真 发表于 2020-9-28 19:28
把判断 改成如果 ， 这样就避免使用判断了

如果用如果的话效果几乎一样……这样做等于没改，，

白天很傻很天真

坚持即胜利 发表于 2020-9-28 19:30
如果用如果的话效果几乎一样……这样做等于没改，，

本来就是区分不同的状态，你非不想用判断

Ossian

1. return (选择 (test1, 选择 (test2, 1, 3), 选择 (test2, 2, 0)))

复制代码

Ossian

回点评 ： 0 1 2 3可以用常量代替    另外 三元表达式没见过么

53770zhang

代码又不复杂 就这样也行.

|bingbing|

  

子程序名	返回值类型	公开	备 注
_启动子程序	整数型

调试输出 (子程序_避免多个判断 ())
返回 (0)

子程序名	返回值类型	公开	备 注
子程序_避免多个判断	整数型		判断两个txt文件是否存在，11表示都存在，22表示都没有。21表示缺失test1.txt，12表示缺失test2.txt。

变量名	类 型	静态	数组	备 注
test1	逻辑型			test1.txt。
test2	逻辑型			test2.txt。
runDir	文本型			运行目录。
测试文件	文本型		2
验证文本1	文本型
验证文本2	文本型

' 检查文件完整性
runDir ＝ 取运行目录 ()
加入成员 (测试文件, “test1.txt”)
加入成员 (测试文件, “test2.txt”)
test1 ＝ 文件是否存在 (runDir ＋ 测试文件 [1])
test2 ＝ 文件是否存在 (runDir ＋ 测试文件 [2])
如果 (test1 ＝ 真)
验证文本1 ＝ “1”
验证文本1 ＝ “2”
如果 (test2 ＝ 真)
验证文本2 ＝ “1”
验证文本2 ＝ “2”
返回 (到整数 (验证文本1 ＋ 验证文本2))

.版本 2<br /> <br /> .子程序 _启动子程序, 整数型<br /> <br /> 调试输出 (子程序_避免多个判断 ())<br /> 返回 (0)<br /> <br /> .子程序 子程序_避免多个判断, 整数型, , 判断两个txt文件是否存在，11表示都存在，22表示都没有。21表示缺失test1.txt，12表示缺失test2.txt。<br /> .局部变量 test1, 逻辑型, , , test1.txt。<br /> .局部变量 test2, 逻辑型, , , test2.txt。<br /> .局部变量 runDir, 文本型, , , 运行目录。<br /> .局部变量 测试文件, 文本型, , "2"<br /> .局部变量 验证文本1, 文本型<br /> .局部变量 验证文本2, 文本型<br /> <br /> ' 检查文件完整性<br /> runDir ＝ 取运行目录 ()<br /> 加入成员 (测试文件, “test1.txt”)<br /> 加入成员 (测试文件, “test2.txt”)<br /> test1 ＝ 文件是否存在 (runDir ＋ 测试文件 [1])<br /> test2 ＝ 文件是否存在 (runDir ＋ 测试文件 [2])<br /> .如果 (test1 ＝ 真)<br />     验证文本1 ＝ “1”<br /> .否则<br />     验证文本1 ＝ “2”<br /> .如果结束<br /> .如果 (test2 ＝ 真)<br />     验证文本2 ＝ “1”<br /> .否则<br />     验证文本2 ＝ “2”<br /> .如果结束<br /> 返回 (到整数 (验证文本1 ＋ 验证文本2))

这样子可以不

a小墨

|bingbing| 发表于 2020-9-28 21:06
[e=0].版本 2

.子程序 _启动子程序, 整数型

验证文本=到整数（test1）+到整数（test2）不是更好么