超级列表框如果第1行第3行第5行的数字相加大于10，编辑框...

feibo8228

如果第1行第3行第5行的数字相加大于10，编辑框就显示1，不大于10就显示0

LEOONL

你说的是列？
888.e (11.48 KB, 下载次数: 4)

2024-11-27 10:22 上传

点击文件名下载附件

feibo8228

如果第1行第3行第5行的数字相加大于10，编辑框就显示1，不大于10就显示0

LEOONL

  

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

如果 (到数值 (超级列表框1.取标题 (0, 0)) ＋ 到数值 (超级列表框1.取标题 (2, 0)) ＋ 到数值 (超级列表框1.取标题 (4, 0)) ＞ 10)
编辑框1.内容 ＝ “1”
编辑框1.内容 ＝ “0”

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> .如果 (到数值 (超级列表框1.取标题 (0, 0)) ＋ 到数值 (超级列表框1.取标题 (2, 0)) ＋ 到数值 (超级列表框1.取标题 (4, 0)) ＞ 10)<br />     编辑框1.内容 ＝ “1”<br /> .否则<br />     编辑框1.内容 ＝ “0”<br /> .如果结束

734030986

888.e (12.17 KB, 下载次数: 0)

2024-11-27 10:59 上传

点击文件名下载附件

  

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

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

子程序名	返回值类型	公开	备 注
_超级列表框xsy_左键单击表项

变量名	类 型	静态	数组	备 注
第一行	整数型
第三行	整数型
第五行	整数型
大于或者小于	整数型

第一行 ＝ 到整数 (超级列表框xsy.取标题 (超级列表框xsy.现行选中项, 1))
第三行 ＝ 到整数 (超级列表框xsy.取标题 (超级列表框xsy.现行选中项, 3))
第五行 ＝ 到整数 (超级列表框xsy.取标题 (超级列表框xsy.现行选中项, 5))
大于或者小于 ＝ 到整数 (第一行 ＋ 第三行 ＋ 第五行)
调试输出 (“第一行：” ＋ 到文本 (第一行), “第三行：” ＋ 到文本 (第三行), “第三行：” ＋ 到文本 (第五行), “大于或者小于：” ＋ 到文本 (大于或者小于))
如果 (大于或者小于 ≥ 10)
编辑框1.内容 ＝ “1”
编辑框1.内容 ＝ “0”

i支持库列表	支持库注释
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _超级列表框xsy_左键单击表项<br /> .局部变量 第一行, 整数型<br /> .局部变量 第三行, 整数型<br /> .局部变量 第五行, 整数型<br /> .局部变量 大于或者小于, 整数型<br /> <br /> 第一行 ＝ 到整数 (超级列表框xsy.取标题 (超级列表框xsy.现行选中项, 1))<br /> 第三行 ＝ 到整数 (超级列表框xsy.取标题 (超级列表框xsy.现行选中项, 3))<br /> 第五行 ＝ 到整数 (超级列表框xsy.取标题 (超级列表框xsy.现行选中项, 5))<br /> 大于或者小于 ＝ 到整数 (第一行 ＋ 第三行 ＋ 第五行)<br /> <br /> 调试输出 (“第一行：” ＋ 到文本 (第一行), “第三行：” ＋ 到文本 (第三行), “第三行：” ＋ 到文本 (第五行), “大于或者小于：” ＋ 到文本 (大于或者小于))<br /> <br /> .如果 (大于或者小于 ≥ 10)<br />     编辑框1.内容 ＝ “1”<br /> .否则<br />     编辑框1.内容 ＝ “0”<br /> .如果结束

842711

  

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

变量名	类 型	静态	数组	备 注
总行数	整数型
i	整数型
从第几行开始计算	整数型
第几列相加	双精度小数型
数值	文本型
取数值	整数型
计算至第几行	双精度小数型

从第几行开始计算 ＝ 到数值 (编辑框2.内容)
计算至第几行 ＝ 到数值 (编辑框3.内容)
第几列相加 ＝ 到数值 (编辑框4.内容)
总行数 ＝ 超级列表框1.取表项数 ()
如果真 (从第几行开始计算 ＜ 1)
信息框 (“开始行数不小于1行”, #错误图标, , )
返回 ()
如果真 (计算至第几行 ＞ 总行数)
计算至第几行 ＝ 总行数
变量循环首 (从第几行开始计算 － 1, 计算至第几行, 1, i)  ' 超级列表框表项索引从0开始
如果真 (i ％ 2 ＝ 1)  ' 取奇数行
取数值 ＝ 取数值 ＋ 到数值 (超级列表框1.取标题 (i, 第几列相加 － 1))

变量循环尾 ()
如果 (取数值 ＞ 10)
编辑框1.内容 ＝ “1”
编辑框1.内容 ＝ “0”

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 总行数, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 从第几行开始计算, 整数型<br /> .局部变量 第几列相加, 双精度小数型<br /> .局部变量 数值, 文本型<br /> .局部变量 取数值, 整数型<br /> .局部变量 计算至第几行, 双精度小数型<br /> <br /> 从第几行开始计算 ＝ 到数值 (编辑框2.内容)<br /> 计算至第几行 ＝ 到数值 (编辑框3.内容)<br /> 第几列相加 ＝ 到数值 (编辑框4.内容)<br /> 总行数 ＝ 超级列表框1.取表项数 ()<br /> <br /> .如果真 (从第几行开始计算 ＜ 1)<br />     信息框 (“开始行数不小于1行”, #错误图标, , )<br />     返回 ()<br /> .如果真结束<br /> .如果真 (计算至第几行 ＞ 总行数)<br />     计算至第几行 ＝ 总行数<br /> .如果真结束<br /> .变量循环首 (从第几行开始计算 － 1, 计算至第几行, 1, i)  ' 超级列表框表项索引从0开始<br />     .如果真 (i ％ 2 ＝ 1)  ' 取奇数行<br />         取数值 ＝ 取数值 ＋ 到数值 (超级列表框1.取标题 (i, 第几列相加 － 1))<br />     .如果真结束<br /> <br /> .变量循环尾 ()<br /> <br /> .如果 (取数值 ＞ 10)<br />     编辑框1.内容 ＝ “1”<br /> .否则<br />     编辑框1.内容 ＝ “0”<br /> .如果结束

feibo8228

LEOONL 发表于 2024-11-27 10:22
你说的是列？

对 是列 打错字了