请问这代码如何精简？

aismy

  

子程序名	返回值类型	公开	备 注
子程序1
参数名	类 型	参考	可空	数组	备 注
i	整数型

变量名	类 型	静态	数组	备 注
s	文本型

判断 (i ＝ 1)
a1 ＝ s
判断 (i ＝ 2)
a2 ＝ s
判断 (i ＝ 3)
a3 ＝ s
判断 (i ＝ 4)
a3 ＝ s

.版本 2<br /> <br /> .子程序 子程序1<br /> .参数 i, 整数型<br /> .局部变量 s, 文本型<br /> <br /> .判断开始 (i ＝ 1)<br />     a1 ＝ s<br /> .判断 (i ＝ 2)<br />     a2 ＝ s<br /> .判断 (i ＝ 3)<br />     a3 ＝ s<br /> .判断 (i ＝ 4)<br />     a3 ＝ s<br /> .默认

感觉可以用多项选择，但好像又不行。。脑袋短路了，求帮助，谢谢。


补充内容 (2021-6-7 21:09):
最后个a3我打错了，应该是 a4 ＝ s 就是这个规律

q6592081

dy6255

a1是啥变量

aismy

dy6255 发表于 2021-6-7 21:10
a1是啥变量

s是文本，a1也是文本

补充内容 (2021-6-7 21:28):
抱歉，我重新发帖了，实际应用中，是用的数组。

1355568730

放数组？

神女软件定制

a[i]=s               

夜凄清

  

子程序名	返回值类型	公开	备 注
子程序1
参数名	类 型	参考	可空	数组	备 注
i	整数型

变量名	类 型	静态	数组	备 注
a	文本型		0
s	文本型

a [i] ＝ s

.版本 2<br /> <br /> .子程序 子程序1<br /> .参数 i, 整数型<br /> .局部变量 a, 文本型, , "0"<br /> .局部变量 s, 文本型<br /> <br /> a <i> ＝ s

q6592081

1. .版本 2
   
2. .支持库 spec
   
3. 
   
4. .程序集 程序集1
   
5. .程序集变量 a, 文本型, , "3"
   
6. 
   
7. .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
   
8. 
   
9. 
   
10. 子程序1 (1)
    
11. 返回 (0)  ' 可以根据您的需要返回任意数值
    
12. 
    
13. .子程序 子程序1
    
14. .参数 i, 整数型
    
15. .局部变量 s, 文本型
    
16. 
    
17. s ＝ “666”
    
18. a [i] ＝ s
    
19. 调试输出 (a [1], a [2], a [3])
    
20. 
    
21. 
    

复制代码