步骤如下：
创新互联是一家从事企业网站建设、成都网站制作、成都网站建设、行业门户网站建设、网页设计制作的专业的建站公司，拥有经验丰富的网站建设工程师和网页设计人员，具备各种规模与类型网站建设的实力，在网站建设领域树立了自己独特的设计风格。自公司成立以来曾独立设计制作的站点数千家。
窗体上添加2个列表框，一个按钮：
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim MyDir As String = "C:\123"
'搜索并显示子文件夹
ListBox1.Items.Clear()
For Each MySubDir As String In System.IO.Directory.GetDirectories(MyDir)
ListBox1.Items.Add(MySubDir)
Next
'搜索并显示文件
ListBox2.Items.Clear()
For Each MyFile As String In System.IO.Directory.GetFiles(MyDir)
ListBox2.Items.Add(MyFile)
Next
End Sub
End Class
net代码用规则对象Regex，直接调用IsMatch就可，返回逻辑值。
MsgBox(System.Text.RegularExpressions.Regex.IsMatch("3455abc64id=45565434", "^.*id=\d{8,10}$"))
.net中访问access好像会自动转换，你把*换成%%试试（注意，是两个百分号）
#是特殊字符，你可以用 “ if "1#仓库" like "1[#]仓库" then msgbox "True"”试试看。
若要与左方括号 ([)、问号 (?)、数字号 (#) 和星号 (*) 这些特殊字符匹配，必须用方括号将它们括起。右方括号 (]) 不能在组中用来与自身匹配，但它可用在组外作为单个字符。
可以将字符序列 [] 视为零长度字符串 ("")；但不能将其作为括在括号中的字符列表的一部分。如果要检查 string 中的某个位置是包含一组字符还是不包含任何字符，可以使用两次 Like。有关示例，请参见如何：将字符串与模式相匹配。
