拖放问题

wyh1820

我现在有俩个文本，一个姓名跟地址，一个电话，我第一次导入姓名加地址的文本(txt)，第二次我要把电话的文本拖进入(俩个文本的信息都是一一对应的)，应该怎么办，用单选框的形式实现，有没有没睡着的大佬来个例子

a45167039

  

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

拖放对象1.注册拖放控件 (超级列表框1.取窗口句柄 ())

子程序名	返回值类型	公开	备 注
_拖放对象1_得到文件
参数名	类 型	参考	可空	数组	备 注
接收到的文件路径	文本型

变量名	类 型	静态	数组	备 注
路径	文本型
文本数组	文本型		0
计次1	整数型
计次2	整数型
临时数组	文本型		0
索引	整数型

路径 ＝ 接收到的文件路径
如果 (文件_取文本编码 (路径) ＝ 1)
文本数组 ＝ 分割文本 (编码_Utf8到Ansi (读入文件 (路径)), #换行符, )
文本数组 ＝ 分割文本 (到文本 (读入文件 (路径)), #换行符, )
计次循环首 (取数组成员数 (文本数组), 计次1)
如果 (寻找文本 (文本数组 [计次1], “电话”, , 假) ≠ -1)
计次循环首 (超级列表框1.取表项数 (), 计次2)
超级列表框1.置标题 (计次2 － 1, 3, 文本_取右边 (文本数组 [计次1], “:”))
计次循环尾 ()
索引 ＝ 超级列表框1.插入表项 (, , , , , )
临时数组 ＝ 分割文本 (文本数组 [计次1], “----”, )
超级列表框1.置标题 (索引, 1, 临时数组 [1])
超级列表框1.置标题 (索引, 2, 临时数组 [2])

计次循环尾 ()

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

.版本 2<br /> .支持库 edroptarget<br /> .支持库 iext<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> 拖放对象1.注册拖放控件 (超级列表框1.取窗口句柄 ())<br /> <br /> .子程序 _拖放对象1_得到文件<br /> .参数 接收到的文件路径, 文本型<br /> .局部变量 路径, 文本型<br /> .局部变量 文本数组, 文本型, , "0"<br /> .局部变量 计次1, 整数型<br /> .局部变量 计次2, 整数型<br /> .局部变量 临时数组, 文本型, , "0"<br /> .局部变量 索引, 整数型<br /> <br /> 路径 ＝ 接收到的文件路径<br /> .如果 (文件_取文本编码 (路径) ＝ 1)<br />     文本数组 ＝ 分割文本 (编码_Utf8到Ansi (读入文件 (路径)), #换行符, )<br /> .否则<br />     文本数组 ＝ 分割文本 (到文本 (读入文件 (路径)), #换行符, )<br /> .如果结束<br /> .计次循环首 (取数组成员数 (文本数组), 计次1)<br /> <br />     .如果 (寻找文本 (文本数组 [计次1], “电话”, , 假) ≠ -1)<br />         .计次循环首 (超级列表框1.取表项数 (), 计次2)<br />             超级列表框1.置标题 (计次2 － 1, 3, 文本_取右边 (文本数组 [计次1], “:”))<br />         .计次循环尾 ()<br />     .否则<br />         索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />         临时数组 ＝ 分割文本 (文本数组 [计次1], “----”, )<br />         超级列表框1.置标题 (索引, 1, 临时数组 [1])<br />         超级列表框1.置标题 (索引, 2, 临时数组 [2])<br />     .如果结束<br /> <br /> .计次循环尾 ()

写的有点烂 你看看是不是你要的效果


补充内容 (2024-12-2 01:26):
计次循环首 (超级列表框1.取表项数 (), 计次2)  应该改成计次循环首 (取数组成员数 (文本数组), 计次2)

wyh1820

第一次拖放的问题没问题，重点在第二次，没头绪

wyh1820

怎么才能把姓名跟地址的txt跟第二次拖进来的电话txt一一对应嘞

a45167039

文本1：姓名----地址？  文本2：电话:139xxxx1234？？？这样么

wyh1820

a45167039 发表于 2024-12-2 01:04
文本1：姓名----地址？  文本2：电话:139xxxx1234？？？这样么

对，第一次拖放的我是没问题，但是我第二次拖放没头绪