虚拟小键盘程序无需输入法寻找字库

在搜索字的时候有点小问题。不过也不是个问题大神来完善完善。

你拿去改改。应该就是你的原创了想改就改吧

无需吹捧好不好无所谓实用就行。

.计次循环首 (超级列表框1.取表项数 (), i)
数组 ＝ 分割文本 (编辑框_汉字.内容, “|”, )
.判断开始 (取数组成员数 (数组) ＞ 到整数 (编辑框_数量.内容))
跳出循环 ()
.默认
.判断开始 (编辑框_拼音.内容 ＝ “”)
编辑框_汉字.内容 ＝ “”
.默认
.如果真 (寻找文本 (超级列表框1.取标题 (i － 1, 0), 编辑框_拼音.内容, , 假) ≠ -1)
编辑框_汉字.内容 ＝ 编辑框_汉字.内容 ＋ 超级列表框1.取标题 (i － 1, 1) ＋ “ | ”
.如果真结束

.判断结束

.判断结束
数组清零 (数组)
.计次循环尾 ()