高级表格读取下拉选项过滤 - 精易论坛

变量名	类型	静态	数组	备注
欲加入文本	文本型

如果 (寻找文本 (过滤文本本, 文本, , 假) ＞ 0)

欲加入文本＝ “”

过滤文本本＝过滤文本本＋文本

欲加入文本＝文本
返回 (欲加入文本)

子程序名	返回值类型	公开	备注
表格重新读取下拉记录

打开 (取运行目录 () ＋ “XXX数据库”, , , , , “如有密码请填写”, )

判断循环首 (尾记录后 () ＝假)

如果真 (高级表格重复文本单位过滤 (读 ("XXX可替换")) ≠ “”)

高级表格1.插入下拉列表项 (3,读 ("XXX可替换"))

跳过 ()

判断循环尾 ()
关闭 ()
' --------------以上过滤重复与空文本--------------------

变量名	类型	静态	数组	备注
欲加入文本	文本型

如果 (寻找文本 (组合框过滤文本, 文本, , 假) ＞ 0)

欲加入文本＝ “”

组合框过滤文本＝组合框过滤文本＋文本

欲加入文本＝文本
返回 (欲加入文本)

组合框.清空 ()
打开 (取运行目录 () ＋ “数据库”, , , , , #密码, )

判断循环首 (尾记录后 () ＝假)

如果真 (组合框重复文本过滤 (读 (xxxx)) ≠ “”)

组合框.加入项目 (读 (xxxx), )

跳过 ()

判断循环尾 ()
到尾记录 ()