窗口1关闭后，列表框搜索出的结果会重复多出一倍。

隐形人14

.版本 2

.程序集 窗口程序集_窗口1
.程序集变量 程序集_首拼, 文本首拼, , "0"
.程序集变量 集_首拼, 文本型

.子程序 _编辑框_输入_内容被改变
.局部变量 n, 整数型

.如果真 (编辑框_输入.内容 ＝ “”)
    列表框_显示.可视 ＝ 假
    返回 ()

.如果真结束
列表框_显示.清空 ()
.计次循环首 (取数组成员数 (程序集_首拼), n)
    .如果真 (程序集_首拼 [n].首拼 ≈ 编辑框_输入.内容)
        列表框_显示.加入项目 (程序集_首拼 [n].文本, )
    .如果真结束

.计次循环尾 ()
列表框_显示.可视 ＝ 真



.子程序 _列表框_显示_双击选择

编辑框_输入.加入文本 (列表框_显示.取项目文本 (列表框_显示.现行选中项))
编辑框_输入.内容 ＝ 子文本替换 (编辑框_输入.内容, 集_首拼, “”, , , 真)
编辑框_输入.起始选择位置 ＝ 取文本长度 (编辑框_输入.内容)
列表框_显示.可视 ＝ 假
编辑框_输入.获取焦点 ()



.子程序 取首拼
.局部变量 局_分割文本, 文本型, , "0"
.局部变量 n, 整数型
.局部变量 局_首拼, 文本首拼

局_分割文本 ＝ 分割文本 (编辑框_内容.内容, #换行符, )
.计次循环首 (取数组成员数 (局_分割文本), n)

    输出调试文本 (局_分割文本 [n])
    输出调试文本 (搜索_取首拼 (局_分割文本 [n]))
    局_首拼.文本 ＝ 局_分割文本 [n]

    局_首拼.首拼 ＝ 搜索_取首拼 (局_分割文本 [n])

    加入成员 (程序集_首拼, 局_首拼)
.计次循环尾 ()



.子程序 _窗口1_创建完毕

取首拼 ()




窗口1关闭一次再打开后列表框搜索出的结果重复的多出一倍，关闭两次再打开搜索就重复多出两倍，以此类推。要怎么弄不会让它关闭窗口1再打开搜索时一直加倍的重复出现结果。。

天雷

变量数组使用前清空一次试试

走一回

1、把列表框事先清空一下。
2、窗口1在关闭时有什么执行的代码吗？

隐形人14

走一回 发表于 2023-11-11 16:15
1、把列表框事先清空一下。
2、窗口1在关闭时有什么执行的代码吗？

列表框清空了，，窗口1在关闭时没有执行的代码！！！不知道哪出了问题！！！

冬夏

窗口1在窗口1创建完毕后清空，再插入数据

隐形人14

冬夏 发表于 2023-11-11 16:34
窗口1在窗口1创建完毕后清空，再插入数据

不行！！！

long280556182

在窗口1关闭时加 销毁() 看看

右手胜过左手

全局变量和程序集变量的问题。程序集_首拼 关闭的时候把这个清空。不确定还有没有其他。你给的代码只有这个。

走一回

隐形人14 发表于 2023-11-11 16:23
列表框清空了，，窗口1在关闭时没有执行的代码！！！不知道哪出了问题！！！ ...

你的源码上传一下就知道了，你贴的码不全，谁知道什么原因呢

隐形人14

帮我看看呗！大佬们！！