一般的Select Case写法如下：

Select Case与Elseif用法示例-入门篇[Access软件网]
http://www.accessoft.com/article-show.asp?id=8114

直接就是

Select Case 变量

Case 结果

但是这样写就不能使用通配符了，所以研究一下，发现可以这样写：

Select Case True

Case 变量 like "*xxx*" '表达式的结果返回False/True

End Select

这样就可以在Select Case中使用表达式了