判断字符串是否相等 - 石陆软件屋

问题-----------------------------------------------------------------------------------------

判断两个串是否“相等”，两个串里面的字符顺序不一定相同，还是举个例子吧，假如两个串是"hello"和"elloh"或者"lleoh"则认为它们相等，这个算法怎么写

方法一---------------------------------------------------------------------------------------
StrComp(string1, String2, [Compare])

函数功能：比较字符串string1和string2。

返回说明：返回整数值：当string1<string2时，返回值<0；当string1=string2时，返回值=0；当string1>string2时，返回值>0。这种比较是按照字符的字典序进行比较。

方法二---------------------------------------------------------------------------------------

或者用API的lstrcmp也能很快地实现字符串的对比

方法三---------------------------------------------------------------------------------------
自己写函数：
Private Function isEqual(str1 As String, str2 As String, Optional Mode As Boolean) As Boolean
'石陆软件屋   http://baidu.bhdata.com
Dim i As Long 'sysdzw
If Len(str1) <> Len(str2) Then '长度不等直接退出
    isEqual = False
    Exit Function
End If
    For i = 1 To Len(str1) '逐个删除串2中相同的
    str2 = Replace(str2, Mid(str1, i, 1), "", , 1, Abs(Mode))
Next
    isEqual = IIf(str2 = "", True, False)
End Function

相关链接：vb | 字符串 | 相等

[阅读字体大小: 大中小]

[本日志由 admin 于 2013-11-01 10:50 PM 编辑]

引用通告地址 (0)：
复制引用地址

http://www.cnng.net/blog/trackback.asp?tbID=36
复制引用地址

http://www.cnng.net/blog/trackback.asp?tbID=36&CP=GBK