不好意思,有一段时间没有更新了。因为开学季,忙着两个孩子上学放学的问题! 今天我们聊一聊模糊查找!首先看一下以下案例: 某外卖对商户进行跟踪管理,并对一些发现的问题进行登记以进行相应的改善。但是,商户目前就有4000多个,而且正以每天数十的速度增加着,因此,在查找对应的商户名称的时候就非常困难。 为了解决这一问题,我们推出的模糊匹配的解决方案。 首先,我们画一窗体。窗体由两个控件组成,一个txtBox和一个listbox。listbox的作用是显示商户名称,而txtbox的作用是用于输入模糊查找的条件。窗体结构如下: 实现过程如下: 1、启动窗体时显示所有商户名称; 2、点击某一个商户名称的时候,实现所点击内容输入到指定单元格; 3、在文本框中输入任意一个或者多个字符时,能匹配包含这些字符的商户。 代码如下: 启动窗体时显示所有商户名称: 结果如下:
点击listbox时,输入商户名称: 结果如下: 输入之后,大家可以用unload me关闭窗体。
重点:怎样实现模糊匹配? 1、模糊匹配,我们需要使用通配符,且使用Like进行匹配。这样,我们需要将录入的字符全部用“*”进行间隔,这样我们可以定义一个自定义函数来实现这一目的。 2、在文本框输入任意字符时,实时进行模糊匹配。这样我们需要用到键盘的up事件,代码如下: 整个效果图如下: 这个功能相当重要哟,如果你想定制小系统,这个功能是必不可少的。 |
|
来自: liuyunhe1954 > 《Excel VBA》