189 8069 5689
用 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"
Like运算符可以让你比较两个字符串来判断它们是否匹配，它还支持通配符。例如，星号（*）代表一个或者多个字符，问号（?）代表单个字符，而井号（#）代表单个数字。另外，通过使用左括号和右括号（[、]），你可以指定一个用来匹配的字符集result = string Like pattern
Like 运算符的语法具有以下几个部分：
部分 描述
result 必需的；任何数值变量。
string 必需的；任何字符串表达式。
pattern 必需的；任何字符串表达式，遵循“说明”中的模式匹配约定。 主要是看字符串格式是不是匹配这个baidu上的Dim MyCheck
MyCheck = "aBBBa" Like "a*a" ' 返回 True。
MyCheck = "F" Like "[A-Z]" ' 返回 True。
MyCheck = "F" Like "[!A-Z]" ' 返回 False。
MyCheck = "a2a" Like "a#a" ' 返回 True。
MyCheck = "aM5b" Like "a[L-P]#[!c-e]" ' 返回 True。
MyCheck = "BAT123khg" Like "B?T*" ' 返回 True。
MyCheck = "CAT123khg" Like "B?T*" ' 返回 False。
1.创建ADODB对象
2.连接数据库
3.输入查询内容,做 SELECT * FORM 数据表 WHERE 关键字段 Like "*" 输入字符 "*;" 查询
4.帮定DATAGRID到做查询的ADODB.RecordClass对象上,即完成你的要求.要详细代码的加分哦.
#是特殊字符，你可以用 “ if "1#仓库" like "1[#]仓库" then msgbox "True"”试试看。
若要与左方括号 ([)、问号 (?)、数字号 (#) 和星号 (*) 这些特殊字符匹配，必须用方括号将它们括起。右方括号 (]) 不能在组中用来与自身匹配，但它可用在组外作为单个字符。
可以将字符序列 [] 视为零长度字符串 ("")；但不能将其作为括在括号中的字符列表的一部分。如果要检查 string 中的某个位置是包含一组字符还是不包含任何字符，可以使用两次 Like。有关示例，请参见如何：将字符串与模式相匹配。
相对于本身的潜在功能，L I K E可能是最被忽视的一个操作符了。它的最基本用途是检查一个字符串与给定样式的匹配程度。
比如，很容易检查一个产品ID号是否由一个字母以及3个数字组成：
If ProductID Like "[A-Za-z][0-9][0-9][0-9]" Then Print
"OK"
或者：
If ProductID Like
"[A-Za-z]###" Then Print "OK"
除了上述基本功能，LIKE在其他情况下也非常有用。
比如，可以检查一个字符串只包含大写字母：
If Not StringVar Like "*[!A-Z]*" Then Print
"OK"
同理，也可以检查一个字符串只包含数字：
If Not StringVar Like "*[!0-9]*" Then Print
"OK"
检查一个字符串只包含字母或者数字符：
If Not StringVar Like "*[!A-Za-z0-9]*" Then Print
"OK"
检查一个字符串是否为合法的VB变量名，就是说开头是一个字母，跟随字母或数字符：
If VarName like "[A-Za-z]*" And Not Mid$(VarName, 2) Like
"*[!A-Z_a-z0-9]*" Then Print "OK"
检查字符串是否至少包含2个空格（连续的或者间隔的）：
If TestString Like "* * *" Then Print
"OK"
进一步确认2个空格是不连续的：
If TestString Like "* ?* *" Then Print
"OK"
检查一个有符号整数是很复杂的事情，因为必须计算出前导符号并且计算好"#"符号的正确数目：
If NumValue Like "#" Or (Len(NumValue) 1 And NumValue Like
"[-+0-9]" String$(Len(NumValue) - 1, "#")) Then Print
"OK"
检测NumValue是否包含一个有符号的十进制数值。这种情况下，我们必须要确定存在一个前导符号以及只有一个十进制分隔符，并且所有其他字符都是数字符：
If NumValue Like "#" Or (Len(NumValue) 1 And
Left$(NumValue, 1) Like "[-+.0-9]" And Not Mid$(NumValue, 2) Like "*[!.0-9]*"
And Not NumValue Like "*.*.*" ) Then Print
"OK"