请教DataTable中某列数据对比问题
请教大虾们：我把文件A的各种属性以文本形式输出，存储到DataTable中的某列
A
sdfsdfs
sdfssf
dfgdfgdg
我现在要在这些属性中检测包不包含c这个字符，如果有一行的数据包含c，则在最下一行写入pass，如果都不包含c，则在最下一行写入fail。请教该如何操作？
[ 本帖最后由 marspm 于 2009-6-26 11:50 编辑 ] 用Instr(1,str1,str2)
1是代表不区别大小写
它返回值是对应字符所在位置
例如：Instr(1,"abc","c")它的返回值是3
假如返回值为0，那么就没有包含"c" 谢谢楼上的！
如果我要对比一串字符，比如51testing,我要检查是否包含testing，那该如何呢？
再次感谢！ 用Instr(1,"51testing","testing")
或者用正则表达式
Function RegExpTest(patrn, strng)
Dim regEx, Match, Matches ' 创建变量。
Set regEx = New RegExp ' 创建正则表达式。
regEx.Pattern = patrn ' 设置模式。
regEx.IgnoreCase = True ' 设置为不区分大小写。
regEx.Global = True ' 设置全局适用。
Set Matches = regEx.Execute(strng) ' 执行搜索。
For Each Match in Matches ' 对 Matches 集合进行迭代。
RetStr = RetStr & "Match found at position "
RetStr = RetStr & Match.FirstIndex & ". Match Value is '"
RetStr = RetStr & Match.Value & "'." & vbCRLF
Next
RegExpTest = RetStr
End Function
MsgBox(RegExpTest("testing", "51testing"))
[ 本帖最后由 lvguobin 于 2009-6-26 12:46 编辑 ]
页:
[1]
