简化代码写法

woyao2991314

Marvin 发表于 2026-7-18 12:56
是这样的，哥可以调试下

解决了判断调用子程序，返回值要中转一下，好吧！这么整 代码也少多了

明天自然醒

  

窗口程序集名	保 留	保 留	备 注
类对象
变量名	类 型	数组	备 注
数组	整数型	0

子程序名	返回值类型	公开	备 注
_初始化			当基于本类的对象被创建后，此方法会被自动调用

子程序名	返回值类型	公开	备 注
_销毁			当基于本类的对象被销毁前，此方法会被自动调用

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

加入成员 (数组, x)

.版本 2<br /> <br /> .程序集 类对象<br /> .程序集变量 数组, 整数型, , "0"<br /> <br /> .子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用<br /> <br /> <br /> <br /> .子程序 n, , 公开<br /> .参数 x, 整数型<br /> <br /> 加入成员 (数组, x)

  

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
类	类对象		50
i	整数型

计次循环首 (50, i)
类 [i].n ()
计次循环尾 ()

.版本 2<br /> <br /> .子程序 子程序1<br /> .局部变量 类, 类对象, , "50"<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (50, i)<br />     类 <i>.n ()<br /> .计次循环尾 ()

补充内容 (2026-7-18 13:10):
如果不会封装，你的项目就已经烂掉了

黑咖啡

  

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

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
n	整数型
局_返回	整数型
局_数组	整数型		0
m	整数型

计次循环首 (3, n)
' 把全部几十个子程序的子程序指针加入到多项选择中...
m ＝ 多项选择 (n, 到整数 (&n1), 到整数 (&n2), 到整数 (&n3))
调用子程序 (m, , 局_返回, 123)
加入成员 (局_数组, 局_返回)
调试输出 (n, m, 局_数组)
计次循环尾 ()
' 开始运行被调试程序
' * 1 | 4523264 | 数组:1{1}
' * 2 | 4523314 | 数组:2{1,2}
' * 3 | 4523364 | 数组:3{1,2,3}
' 被调试易程序运行完毕

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

返回 (1)

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

返回 (2)

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

返回 (3)

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

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 n, 整数型<br /> .局部变量 局_返回, 整数型<br /> .局部变量 局_数组, 整数型, , "0"<br /> .局部变量 m, 整数型<br /> <br /> <br /> .计次循环首 (3, n)<br />     ' 把全部几十个子程序的子程序指针加入到多项选择中...<br />     m ＝ 多项选择 (n, 到整数 (&n1), 到整数 (&n2), 到整数 (&n3))<br />     调用子程序 (m, , 局_返回, 123)<br />     加入成员 (局_数组, 局_返回)<br />     调试输出 (n, m, 局_数组)<br /> .计次循环尾 ()<br /> ' 开始运行被调试程序<br /> ' * 1 | 4523264 | 数组:1{1}<br /> ' * 2 | 4523314 | 数组:2{1,2}<br /> ' * 3 | 4523364 | 数组:3{1,2,3}<br /> ' 被调试易程序运行完毕<br /> <br /> <br /> .子程序 n1, 整数型<br /> .参数 参x, 整数型<br /> <br /> 返回 (1)<br /> <br /> <br /> .子程序 n2, 整数型<br /> .参数 参x, 整数型<br /> <br /> 返回 (2)<br /> <br /> <br /> .子程序 n3, 整数型<br /> .参数 参x, 整数型<br /> <br /> 返回 (3)

小书

不用简化。就是这样写。这样写清楚。简化了你都看不懂有什么用。

RainCharm

说了不要生气，乱写一通，不管命令是不是能运行通过，主打一个随心所欲

小麒QCC

  

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

子程序1 ()

子程序名	返回值类型	公开	备 注
子程序1

变量名	类 型	静态	数组	备 注
n	整数型
数组1	整数型		0
数组2	整数型		0
数组3	整数型		0
数组4	整数型		0
数组5	整数型		0
i	整数型
临时文本	文本型

计次循环首 (50, n)
如果真 (n ≥ 1 且 n ≤ 5)
加入成员 (数组1, n)
加入成员 (数组2, n)
加入成员 (数组3, n)
加入成员 (数组4, n)
加入成员 (数组5, n)

计次循环尾 ()
' 正确显示数组内容的方法
临时文本 ＝ “”
计次循环首 (取数组成员数 (数组1), i)
临时文本 ＝ 临时文本 ＋ 到文本 (数组1 [i]) ＋ “,”
计次循环尾 ()
调试输出 (“数组1:”, 临时文本)
临时文本 ＝ “”
计次循环首 (取数组成员数 (数组2), i)
临时文本 ＝ 临时文本 ＋ 到文本 (数组2 [i]) ＋ “,”
计次循环尾 ()
调试输出 (“数组2:”, 临时文本)
' 或者更简单地循环输出每个元素
调试输出 (“========== 详细内容 ==========”)
计次循环首 (取数组成员数 (数组1), i)
调试输出 (取文本 (“第%d次: [%d, %d, %d, %d, %d]”, i, 数组1 [i], 数组2 [i], 数组3 [i], 数组4 [i], 数组5 [i]))
计次循环尾 ()
' 显示成员数量
调试输出 (“数组1成员数:”, 取数组成员数 (数组1))
调试输出 (“数组2成员数:”, 取数组成员数 (数组2))
调试输出 (“数组3成员数:”, 取数组成员数 (数组3))
调试输出 (“数组4成员数:”, 取数组成员数 (数组4))
调试输出 (“数组5成员数:”, 取数组成员数 (数组5))

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 子程序1 ()<br /> <br /> .子程序 子程序1<br /> .局部变量 n, 整数型<br /> .局部变量 数组1, 整数型, , "0"<br /> .局部变量 数组2, 整数型, , "0"<br /> .局部变量 数组3, 整数型, , "0"<br /> .局部变量 数组4, 整数型, , "0"<br /> .局部变量 数组5, 整数型, , "0"<br /> .局部变量 i, 整数型<br /> .局部变量 临时文本, 文本型<br /> <br /> .计次循环首 (50, n)<br />     .如果真 (n ≥ 1 且 n ≤ 5)<br />         加入成员 (数组1, n)<br />         加入成员 (数组2, n)<br />         加入成员 (数组3, n)<br />         加入成员 (数组4, n)<br />         加入成员 (数组5, n)<br />     .如果真结束<br /> .计次循环尾 ()<br /> <br /> ' 正确显示数组内容的方法<br /> 临时文本 ＝ “”<br /> .计次循环首 (取数组成员数 (数组1), i)<br />     临时文本 ＝ 临时文本 ＋ 到文本 (数组1 <i>) ＋ “,”<br /> .计次循环尾 ()<br /> 调试输出 (“数组1:”, 临时文本)<br /> <br /> 临时文本 ＝ “”<br /> .计次循环首 (取数组成员数 (数组2), i)<br />     临时文本 ＝ 临时文本 ＋ 到文本 (数组2 <i>) ＋ “,”<br /> .计次循环尾 ()<br /> 调试输出 (“数组2:”, 临时文本)<br /> <br /> ' 或者更简单地循环输出每个元素<br /> 调试输出 (“========== 详细内容 ==========”)<br /> .计次循环首 (取数组成员数 (数组1), i)<br />     调试输出 (取文本 (“第%d次: [%d, %d, %d, %d, %d]”, i, 数组1 <i>, 数组2 <i>, 数组3 <i>, 数组4 <i>, 数组5 <i>))<br /> .计次循环尾 ()<br /> <br /> ' 显示成员数量<br /> 调试输出 (“数组1成员数:”, 取数组成员数 (数组1))<br /> 调试输出 (“数组2成员数:”, 取数组成员数 (数组2))<br /> 调试输出 (“数组3成员数:”, 取数组成员数 (数组3))<br /> 调试输出 (“数组4成员数:”, 取数组成员数 (数组4))<br /> 调试输出 (“数组5成员数:”, 取数组成员数 (数组5))

影纸

先看效果，只是写了查看：

效果图

简化写法例子.e (958.47 KB, 下载次数: 0)

2 小时前 上传

点击文件名下载附件

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
集_主数据组	数组类型	1,1

子程序名	返回值类型	公开	备 注
_按钮1_被单击

如果真 (到整数 (编辑框1.内容) ≤ 0)
编辑框1.内容 ＝ “1”
如果真 (到整数 (编辑框2.内容) ≤ 0)
编辑框2.内容 ＝ “1”
子程序_数据操作 (到整数 (编辑框1.内容), 到整数 (编辑框2.内容))

子程序名	返回值类型	公开	备 注
子程序_数据操作
参数名	类 型	参考	可空	数组	备 注
参_组数	整数型				要操作哪组数据
参_序号	整数型				要操作的数据序号

编辑框3.内容 ＝ 到文本 (集_主数据组 [参_组数] [参_序号])

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
数据组数	整数型
每组数据数	整数型
i	整数型
s	整数型

数据组数 ＝ 50
每组数据数 ＝ 50
重定义数组 (集_主数据组, 假, 数据组数, 每组数据数)
' 测试用数据
计次循环首 (数据组数, i)
计次循环首 (每组数据数, s)
集_主数据组 [i] [s] ＝ 到整数 (到文本 (i) ＋ 到文本 (s))
计次循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
Javalib	Java支持库

.版本 2<br /> .支持库 Javalib<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 集_主数据组, 数组类型, , "1,1"<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> .如果真 (到整数 (编辑框1.内容) ≤ 0)<br />     编辑框1.内容 ＝ “1”<br /> .如果真结束<br /> .如果真 (到整数 (编辑框2.内容) ≤ 0)<br />     编辑框2.内容 ＝ “1”<br /> .如果真结束<br /> 子程序_数据操作 (到整数 (编辑框1.内容), 到整数 (编辑框2.内容))<br /> <br /> <br /> .子程序 子程序_数据操作<br /> .参数 参_组数, 整数型, , 要操作哪组数据<br /> .参数 参_序号, 整数型, , 要操作的数据序号<br /> <br /> 编辑框3.内容 ＝ 到文本 (集_主数据组 [参_组数] [参_序号])<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 数据组数, 整数型<br /> .局部变量 每组数据数, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 s, 整数型<br /> <br /> 数据组数 ＝ 50<br /> 每组数据数 ＝ 50<br /> 重定义数组 (集_主数据组, 假, 数据组数, 每组数据数)<br /> ' 测试用数据<br /> .计次循环首 (数据组数, i)<br />     .计次循环首 (每组数据数, s)<br />         集_主数据组 <i> <strike> ＝ 到整数 (到文本 (i) ＋ 到文本 (s))<br />     .计次循环尾 ()<br /> .计次循环尾 ()