上传个文件 大佬参考下

aipca 发表于 2025-5-24 22:05
将界面上传 简单的描述一下 需要实现的效果，你这样描述让别人干猜实现效果啊。 ...

上传了

  

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

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

找编辑框 ＝ 寻找组件 (选择夹1, “”, “编辑框”, , )
计次循环首 (取找到组件数目 (找编辑框), i)
编辑框 ＝ 取所找到组件 (找编辑框, i － 1)
判断 (编辑框.内容 ＝ 编辑框1.内容)
判断 (编辑框.标记 ≤ 30)  ' 建议将U秘钥和Z秘钥前缀统一 方便查找组件的时候和时间编辑框分开，做好有序标记，方便子夹管理，选择夹的子夹没有窗口句柄，所以无法直接取得现行子夹。
选择夹1.现行子夹 ＝ 0
判断 (编辑框.标记 ≤ 60 且 编辑框.标记 ＞ 30)
选择夹1.现行子夹 ＝ 1
' ……类似条件

编辑框.获取焦点 ()



计次循环尾 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 编辑框, 编辑框<br /> .局部变量 i, 整数型<br /> .局部变量 找编辑框, 整数型<br /> <br /> 找编辑框 ＝ 寻找组件 (选择夹1, “”, “编辑框”, , )<br /> <br /> .计次循环首 (取找到组件数目 (找编辑框), i)<br />     编辑框 ＝ 取所找到组件 (找编辑框, i － 1)<br />     .判断开始 (编辑框.内容 ＝ 编辑框1.内容)<br />         .判断开始 (编辑框.标记 ≤ 30)  ' 建议将U秘钥和Z秘钥前缀统一 方便查找组件的时候和时间编辑框分开，做好有序标记，方便子夹管理，选择夹的子夹没有窗口句柄，所以无法直接取得现行子夹。<br />             选择夹1.现行子夹 ＝ 0<br />         .判断 (编辑框.标记 ≤ 60 且 编辑框.标记 ＞ 30)<br />             选择夹1.现行子夹 ＝ 1<br />         .默认<br />             ' ……类似条件<br />         .判断结束<br /> <br />         编辑框.获取焦点 ()<br />     .默认<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()

这个制作超级列表框会不会方便些

将界面上传 简单的描述一下 需要实现的效果，你这样描述让别人干猜实现效果啊。

把 编辑框 加到 数组 中，然后按照数组下标来找：

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
数组	编辑框	0

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

加入成员 (数组, 编辑框2)
加入成员 (数组, 编辑框3)
加入成员 (数组, 编辑框4)
加入成员 (数组, 编辑框5)
加入成员 (数组, 编辑框6)

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

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

数 ＝ 到整数 (编辑框1.内容)
如果真 (数 ＜ 1 或 数 ＞ 取数组成员数 (数组))
返回 ()
选择夹1.现行子夹 ＝ 数 － 1
数组 [数].获取焦点 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 数组, 编辑框, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 加入成员 (数组, 编辑框2)<br /> 加入成员 (数组, 编辑框3)<br /> 加入成员 (数组, 编辑框4)<br /> 加入成员 (数组, 编辑框5)<br /> 加入成员 (数组, 编辑框6)<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 数, 整数型<br /> <br /> 数 ＝ 到整数 (编辑框1.内容)<br /> .如果真 (数 ＜ 1 或 数 ＞ 取数组成员数 (数组))<br />     返回 ()<br /> .如果真结束<br /> 选择夹1.现行子夹 ＝ 数 － 1<br /> 数组 [数].获取焦点 ()

例子2.zip (1.36 KB, 下载次数: 2)

昨天 22:02 上传

点击文件名下载附件

zainex 发表于 2025-5-24 21:17
直接设置 选择夹1 的 现行子夹 就可以了：
[e=1].版本 2

是这样的 例如 选择夹外的编辑框1内容为123    夹内为2~10 按下按钮 跳转编辑框1内容一样的对应的选择夹并对应编辑框   

直接设置 选择夹1 的 现行子夹 就可以了：

  

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

选择夹1.现行子夹 ＝ 2
编辑框1.获取焦点 ()

.版本 2<br /> <br /> .子程序 _按钮1_被单击<br /> <br /> 选择夹1.现行子夹 ＝ 2<br /> 编辑框1.获取焦点 ()

例子.zip (925 Bytes, 下载次数: 1)

昨天 21:17 上传

点击文件名下载附件

用标记吧，

补充内容 (2025-5-24 21:02):
或者自己组一个选择夹

对每个编辑框进行标记（数字不能相同）：

因为有120个编辑框，四个子选项夹，所以直接除以30就能确定所在子夹：

  

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

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

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

计次循环首 (120, 数)
编辑框 ＝ 取标记组件 (数)
如果真 (编辑框.内容 ＝ 编辑框1.内容)
选择夹1.现行子夹 ＝ 数 ÷ 30
编辑框.获取焦点 ()
跳出循环 ()

计次循环尾 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 数, 整数型<br /> .局部变量 编辑框, 编辑框<br /> <br /> .计次循环首 (120, 数)<br />     编辑框 ＝ 取标记组件 (数)<br />     .如果真 (编辑框.内容 ＝ 编辑框1.内容)<br />         选择夹1.现行子夹 ＝ 数 ÷ 30<br />         编辑框.获取焦点 ()<br />         跳出循环 ()<br />     .如果真结束<br /> <br /> .计次循环尾 ()

例子3.zip (10.75 KB, 下载次数: 1)

昨天 23:00 上传

点击文件名下载附件


补充内容 (2025-5-24 23:21):
选择夹1.现行子夹 ＝ 数 ÷ 30 改成 选择夹1.现行子夹 ＝ 选择 (数 ％ 30 ≠ 0, 数 ÷ 30, 数 ÷ 30 － 1)