用循环来读取表格判断是否为空，循环变量的疑问

吉祥火

程序小白，初学见笑。有个循环搞不定
排班，比如隔3天打扫地面一次
隔4天擦玻璃一次
如果当天已经安排扫地，则第二天擦玻璃。擦玻璃重新计算日期

尝试使用 计次循环 结果参数I不能在循环内改变带出

又尝试用变量循环，参数I还是不能变化




.版本 2
.支持库 eGrid
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 隔开有数据, 整数型
.子程序 __启动窗口_创建完毕

.子程序 _按钮1_被单击
.局部变量 i, 整数型
.局部变量 项目一间隔, 整数型
.局部变量 项目二间隔, 整数型
.局部变量 排班天数, 整数型
排班天数 ＝ 200
.计次循环首 (排班天数, i)
    高级表格1.置数据 (0, i, 1, i)
.计次循环尾 ()

项目一间隔 ＝ 3
项目二间隔 ＝ 4
.计次循环首 (排班天数, i)
    .如果真 ((i － 1) ％ (项目一间隔 ＋ 1) ＝ 0)
        高级表格1.置数据 (1, i, 1, “扫地”)
    .如果真结束
.计次循环尾 ()

.变量循环首 (1, 排班天数, 1, i)
    调试输出 (“项目 -” ＋ 到文本 (i))
    ' 如果真 (隔开有数据 ≠ 1)
    ' 隔开有数据 ＝ 1
    .如果真 ((i － 1) ％ (项目二间隔 ＋ 1) ＝ 0)
        .如果 (高级表格1.取数据 (1, i) ＝ “”)
            高级表格1.置数据 (2, i, 1, “擦玻璃”)
        .否则
            调试输出 (“比较 -” ＋ 到文本 (i))
            i ＝ i ＋ 1
            调试输出 (“相加---” ＋ 到文本 (i))
            高级表格1.置数据 (2, i, 1, “擦玻璃”)


        .如果结束
    .如果真结束
.变量循环尾 ()

吉祥火

主要功能就是想实现，先读取目标位置是否有数据，如果没有，则安排下一个工作。如果已经有安排了。则顺序向后延伸一天。后面的间隔仍然不变

  

.支持库 eGrid
.支持库 spec
.程序集 窗口程序集_启动窗口
.程序集变量 隔开有数据, 整数型
.子程序 __启动窗口_创建完毕

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

.局部变量 i, 整数型
.局部变量 项目一间隔, 整数型
.局部变量 项目二间隔, 整数型
.局部变量 排班天数, 整数型
排班天数 ＝ 200
计次循环首 (排班天数, i)
高级表格1.置数据 (0, i, 1, i)
计次循环尾 ()

项目一间隔 ＝ 3
项目二间隔 ＝ 4
计次循环首 (排班天数, i)
如果真 ( (i － 1) ��� (项目一间隔 ＋ 1) ＝ 0)
高级表格1.置数据 (1, i, 1, “扫地”)

计次循环尾 ()

变量循环首 (1, 排班天数, 1, i)
调试输出 (“项目 -” ＋ 到文本 (i))
' 如果真 (隔开有数据 ≠ 1)
' 隔开有数据 ＝ 1
如果真 ( (i － 1) ��� (项目二间隔 ＋ 1) ＝ 0)
如果 (高级表格1.取数据 (1, i) ＝ “”)
高级表格1.置数据 (2, i, 1, “擦玻璃”)
调试输出 (“比较 -” ＋ 到文本 (i))
i ＝ i ＋ 1
调试输出 (“相加---” ＋ 到文本 (i))
高级表格1.置数据 (2, i, 1, “擦玻璃”)


变量循环尾 ()

.版本 2<br /> .支持库 eGrid<br /> .支持库 spec<br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 隔开有数据, 整数型<br /> .子程序 __启动窗口_创建完毕<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 项目一间隔, 整数型<br /> .局部变量 项目二间隔, 整数型<br /> .局部变量 排班天数, 整数型<br /> 排班天数 ＝ 200<br /> .计次循环首 (排班天数, i)<br />      高级表格1.置数据 (0, i, 1, i)<br /> .计次循环尾 ()<br /> <br /> 项目一间隔 ＝ 3<br /> 项目二间隔 ＝ 4<br /> .计次循环首 (排班天数, i)<br />      .如果真 ((i － 1) ％ (项目一间隔 ＋ 1) ＝ 0)<br />          高级表格1.置数据 (1, i, 1, “扫地”)<br />      .如果真结束<br /> .计次循环尾 ()<br /> <br /> .变量循环首 (1, 排班天数, 1, i)<br />      调试输出 (“项目 -” ＋ 到文本 (i))<br />      ' 如果真 (隔开有数据 ≠ 1)<br />      ' 隔开有数据 ＝ 1<br />      .如果真 ((i － 1) ％ (项目二间隔 ＋ 1) ＝ 0)<br />          .如果 (高级表格1.取数据 (1, i) ＝ “”)<br />              高级表格1.置数据 (2, i, 1, “擦玻璃”)<br />          .否则<br />              调试输出 (“比较 -” ＋ 到文本 (i))<br />              i ＝ i ＋ 1<br />              调试输出 (“相加---” ＋ 到文本 (i))<br />              高级表格1.置数据 (2, i, 1, “擦玻璃”)<br /> <br /> <br />         .如果结束<br />      .如果真结束<br /> .变量循环尾 ()

吉祥火

各位大神~~ 给个思路呗

小野野

  

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

变量名	类 型	静态	数组	备 注
i	整数型
项目一间隔	整数型
项目二间隔	整数型
排班天数	整数型

排班天数 ＝ 200
计次循环首 (排班天数, i)
高级表格1.置数据 (0, i, 1, i)
计次循环尾 ()
项目一间隔 ＝ 3
项目二间隔 ＝ 4
变量循环首 (1, 排班天数, 项目一间隔, i)
高级表格1.置数据 (1, i, 1, “扫地”)
变量循环尾 ()
变量循环首 (1, 排班天数, 项目二间隔, i)
高级表格1.置数据 (2, i, 1, “擦玻璃”)
变量循环尾 ()

i支持库列表	支持库注释
eGrid	高级表格支持库

.版本 2<br /> .支持库 eGrid<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 项目一间隔, 整数型<br /> .局部变量 项目二间隔, 整数型<br /> .局部变量 排班天数, 整数型<br /> <br /> 排班天数 ＝ 200<br /> .计次循环首 (排班天数, i)<br />     高级表格1.置数据 (0, i, 1, i)<br /> .计次循环尾 ()<br /> 项目一间隔 ＝ 3<br /> 项目二间隔 ＝ 4<br /> .变量循环首 (1, 排班天数, 项目一间隔, i)<br />     高级表格1.置数据 (1, i, 1, “扫地”)<br /> .变量循环尾 ()<br /> .变量循环首 (1, 排班天数, 项目二间隔, i)<br />     高级表格1.置数据 (2, i, 1, “擦玻璃”)<br /> .变量循环尾 ()

吉祥火

小野野 发表于 2019-6-7 20:24
[e=3].版本 2
.支持库 eGrid

这样会出现一天当中两种安排。

我想实现如图的安排：

红色部分，就是自动延后安排


补充内容 (2019-6-7 20:45):
我这是为了直观，做到了两行，最后结果实际是需要在一行数据输出。

吉祥火

大神给个思路啊。。。

吉祥火

没大神帮忙，只好用本办法解决
循环跳循环，改变变量循环起始位置来实现，比较笨

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
训练开始日	整数型
项目一间隔	整数型
项目二间隔	整数型
排班天数	整数型

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

排班天数 ＝ 200
项目一间隔 ＝ 2
项目二间隔 ＝ 3

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

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

计次循环首 (排班天数, i)
高级表格1.置数据 (0, i, 1, i)
计次循环尾 ()
' 高级表格1.置数据 (1, 1, 项目一间隔 ＋ 1, “扫地”)
变量循环首 (1, 排班天数, 项目一间隔 ＋ 1, i)
高级表格1.置数据 (1, i, 1, “扫地”)
变量循环尾 ()

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

变量名	类 型	静态	数组	备 注
i	整数型
ii	整数型

计次循环首 (排班天数, i)
高级表格1.置数据 (0, i, 1, i)
计次循环尾 ()
变量循环首 (1, 排班天数, 项目一间隔 ＋ 1, i)
高级表格1.置数据 (2, i, 1, “扫地”)
变量循环尾 ()
训练开始日 ＝ 2
' 高级表格1.置数据 (2, 训练开始日, 1, “擦玻璃”)
计次循环首 (排班天数, i)
变量循环首 (训练开始日, 排班天数, 项目二间隔 ＋ 1, ii)
如果真 (排班天数 － ii ＜ 项目二间隔)
返回 ()
如果 (高级表格1.取数据 (2, ii) ＝ “”)
高级表格1.置数据 (2, ii, 1, “擦玻璃”)
训练开始日 ＝ ii ＋ 1
跳出循环 ()

变量循环尾 ()
计次循环尾 ()

i支持库列表	支持库注释
eGrid	高级表格支持库

.版本 2<br /> .支持库 eGrid<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 训练开始日, 整数型<br /> .程序集变量 项目一间隔, 整数型<br /> .程序集变量 项目二间隔, 整数型<br /> .程序集变量 排班天数, 整数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 排班天数 ＝ 200<br /> 项目一间隔 ＝ 2<br /> 项目二间隔 ＝ 3<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (排班天数, i)<br />     高级表格1.置数据 (0, i, 1, i)<br /> .计次循环尾 ()<br /> ' 高级表格1.置数据 (1, 1, 项目一间隔 ＋ 1, “扫地”)<br /> .变量循环首 (1, 排班天数, 项目一间隔 ＋ 1, i)<br />     高级表格1.置数据 (1, i, 1, “扫地”)<br /> .变量循环尾 ()<br /> <br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 ii, 整数型<br /> <br /> .计次循环首 (排班天数, i)<br />     高级表格1.置数据 (0, i, 1, i)<br /> .计次循环尾 ()<br /> <br /> .变量循环首 (1, 排班天数, 项目一间隔 ＋ 1, i)<br />     高级表格1.置数据 (2, i, 1, “扫地”)<br /> .变量循环尾 ()<br /> <br /> 训练开始日 ＝ 2<br /> ' 高级表格1.置数据 (2, 训练开始日, 1, “擦玻璃”)<br /> .计次循环首 (排班天数, i)<br />     .变量循环首 (训练开始日, 排班天数, 项目二间隔 ＋ 1, ii)<br />         .如果真 (排班天数 － ii ＜ 项目二间隔)<br />             返回 ()<br />         .如果真结束<br />         .如果 (高级表格1.取数据 (2, ii) ＝ “”)<br />             高级表格1.置数据 (2, ii, 1, “擦玻璃”)<br />         .否则<br />             训练开始日 ＝ ii ＋ 1<br />             跳出循环 ()<br />         .如果结束<br /> <br />     .变量循环尾 ()<br /> .计次循环尾 ()

球大懒

用“判断循环首”