怎么按要求取出编辑框1或编辑框2或编辑框3内容

12:30错爱

我想要的是如果编辑框1≠0，点击按钮后编辑框4就只取出编辑框1的内容
如果编辑框1和编辑框2都≠0，那就取出编辑框1和编辑框2内容
反正就是把编辑框≠0的都取出来， 编辑框=0的不取



来个大神给补全例子
取内容.e (4.22 KB, 下载次数: 2)

7 天前 上传

点击文件名下载附件
取内容

haoren1212

  

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

变量名	类 型	静态	数组	备 注
i	整数型
编辑框数组	整数型		0

数组清零 (编辑框数组)
编辑框4.内容 ＝ “”
加入成员 (编辑框数组, 到整数 (编辑框1.内容))
加入成员 (编辑框数组, 到整数 (编辑框2.内容))
加入成员 (编辑框数组, 到整数 (编辑框3.内容))
计次循环首 (取数组成员数 (编辑框数组), i)
如果真 (编辑框数组 [i] ≠ 0)
编辑框4.加入文本 (到文本 (编辑框数组 [i]) ＋ #换行符 )

计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 编辑框数组, 整数型, , "0"<br /> <br /> 数组清零 (编辑框数组)<br /> 编辑框4.内容 ＝ “”<br /> 加入成员 (编辑框数组, 到整数 (编辑框1.内容))<br /> 加入成员 (编辑框数组, 到整数 (编辑框2.内容))<br /> 加入成员 (编辑框数组, 到整数 (编辑框3.内容))<br /> .计次循环首 (取数组成员数 (编辑框数组), i)<br />     .如果真 (编辑框数组 <i> ≠ 0)<br />         编辑框4.加入文本 (到文本 (编辑框数组 <i>) ＋ #换行符)<br />     .如果真结束<br /> <br /> .计次循环尾 ()

cobi

  

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

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

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

如果真 (编辑框1.内容 ≠ “0” 且 编辑框1.内容 ≠ “”)
文本内容 ＝ 编辑框1.内容 ＋ “，”

如果真 (编辑框2.内容 ≠ “0” 且 编辑框2.内容 ≠ “”)
文本内容 ＝ 文本内容 ＋ 编辑框2.内容 ＋ “，”

如果真 (编辑框3.内容 ≠ “0” 且 编辑框3.内容 ≠ “”)
文本内容 ＝ 文本内容 ＋ 编辑框3.内容

编辑框4.内容 ＝ 文本内容

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 文本内容, 文本型<br /> <br /> .如果真 (编辑框1.内容 ≠ “0” 且 编辑框1.内容 ≠ “”)<br />     文本内容 ＝ 编辑框1.内容 ＋ “，”<br /> .如果真结束<br /> <br /> .如果真 (编辑框2.内容 ≠ “0” 且 编辑框2.内容 ≠ “”)<br />     文本内容 ＝ 文本内容 ＋ 编辑框2.内容 ＋ “，”<br /> .如果真结束<br /> <br /> .如果真 (编辑框3.内容 ≠ “0” 且 编辑框3.内容 ≠ “”)<br />     文本内容 ＝ 文本内容 ＋ 编辑框3.内容<br /> .如果真结束<br /> <br /> 编辑框4.内容 ＝ 文本内容

南影

可以用寻找组件

  

子程序名	返回值类型	公开	备 注
组件_寻找判断

变量名	类 型	静态	数组	备 注
找到句柄	整数型
找到数量	整数型
i	整数型
组件_编辑框	编辑框

找到句柄 ＝ 寻找组件 (_启动窗口, “编辑框”, “编辑框”, , )  ' 寻找窗口内的所有名称是编辑框且类型是编辑框的组件
找到数量 ＝ 取找到组件数目 (找到句柄)  ' 取出找的的数目
如果真 (找到数量 ＝ 0)  ' 判断找到数量要是=0就返回
调试输出 (“未找到组件”)
返回 ()
计次循环首 (找到数量, i)  ' 循环找到数目
组件_编辑框 ＝ 取所找到组件 (找到句柄, i － 1)  ' 循环取出组件
如果真 (取组件名称 (组件_编辑框) ≠ “编辑框4”)  ' 判断组件名称 ≠ 编辑框4
如果真 (组件_编辑框.内容 ≠ “0”)  ' 判断 组件内容 ≠ 0
编辑框4.加入文本 (取组件名称 (组件_编辑框) ＋ “ 内容：” ＋ 组件_编辑框.内容 ＋ #换行符 )


计次循环尾 ()
清除组件寻找句柄 (找到句柄)

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

.版本 2<br /> .支持库 spec<br /> <br /> .子程序 组件_寻找判断<br /> .局部变量 找到句柄, 整数型<br /> .局部变量 找到数量, 整数型<br /> .局部变量 i, 整数型<br /> .局部变量 组件_编辑框, 编辑框<br /> <br /> 找到句柄 ＝ 寻找组件 (_启动窗口, “编辑框”, “编辑框”, , )  ' 寻找窗口内的所有名称是编辑框且类型是编辑框的组件<br /> 找到数量 ＝ 取找到组件数目 (找到句柄)  ' 取出找的的数目<br /> .如果真 (找到数量 ＝ 0)  ' 判断找到数量要是=0就返回<br />     调试输出 (“未找到组件”)<br />     返回 ()<br /> .如果真结束<br /> .计次循环首 (找到数量, i)  ' 循环找到数目<br />     组件_编辑框 ＝ 取所找到组件 (找到句柄, i － 1)  ' 循环取出组件<br />     .如果真 (取组件名称 (组件_编辑框) ≠ “编辑框4”)  ' 判断组件名称 ≠ 编辑框4<br />         .如果真 (组件_编辑框.内容 ≠ “0”)  ' 判断 组件内容 ≠ 0<br />             编辑框4.加入文本 (取组件名称 (组件_编辑框) ＋ “ 内容：” ＋ 组件_编辑框.内容 ＋ #换行符)<br />         .如果真结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 清除组件寻找句柄 (找到句柄)