#是特殊字符，你可以用 “ if "1#仓库" like "1[#]仓库" then msgbox "True"”试试看。
创新互联公司服务项目包括萨嘎网站建设、萨嘎网站制作、萨嘎网页制作以及萨嘎网络营销策划等。多年来，我们专注于互联网行业，利用自身积累的技术优势、行业经验、深度合作伙伴关系等，向广大中小型企业、政府机构等提供互联网行业的解决方案，萨嘎网站推广取得了明显的社会效益与经济效益。目前，我们服务的客户以成都为中心已经辐射到萨嘎省份的部分城市，未来相信会继续扩大服务区域并继续获得客户的支持与信任！
若要与左方括号 ([)、问号 (?)、数字号 (#) 和星号 (*) 这些特殊字符匹配，必须用方括号将它们括起。右方括号 (]) 不能在组中用来与自身匹配，但它可用在组外作为单个字符。
可以将字符序列 [] 视为零长度字符串 ("")；但不能将其作为括在括号中的字符列表的一部分。如果要检查 string 中的某个位置是包含一组字符还是不包含任何字符，可以使用两次 Like。有关示例，请参见如何：将字符串与模式相匹配。
源代码如下：（代码写在按钮点击事件里）
Label1.Text = ""
Label2.Text = ""
Dim a As String = TextBox1.Text
Dim b As String = TextBox2.Text
For x = 1 To a.Length
Dim txt As String = Mid(a, x, 1)
If txt Like "#" Then
Label1.Text = Label1.Text txt
End If
Next
For x = 1 To b.Length
Dim txt As String = Mid(b, x, 1)
If txt Like "#" Then
Label2.Text = Label2.Text txt
End If
Next
此方法用的是mid 将一个字符串拆分成单个字符，然后用like运算符进行对比是否为数字，关于这两个函数的用法如果不懂的可以自己搜索下，此外还有别的方法，这里就不多说了
"SELECT * From 客户资料 where 客户名称 like '%" ComboBox4.Text "%'"
这样改一下即可
用 Like
% = 任意数量的字符
？= 单个字符
类似简易的正规则比对。
具体可参照MSDN
例：(以下代码可以直接放到程序里执行)
dim str as string
str = "abc123"
if str like "a%" then msgbox "yes"
if str like "%a%2%" then msgbox "yes"
if str like "%3" then msgbox "yes"
if str like "%3?" = false then msgbox "no"