【已解决】 比较两个字符串把相同和不相同的部分都列出来??

xdafeng

比较两个字符串把相同和不相同的部分都列出来??

haijie1223

你这个题目太大，搞不了，字符串比较的话，实在太多种情况了。
对于相对应位置上的比较：

$str1 = "123dsd456"
$str2 = "123456abc"

MsgBox(0, "", compare($str1, $str2))

Func compare($s1, $s2)
        Local $l1 = StringLen($s1)
        Local $l2 = StringLen($s2)
        Local $dstr1, $dstr2
        Local $sstr
        If BitAND($l1, $l2) = 0 Then SetError(0)
        If $l1 = $l2 Then
                For $i = 1 To $l1
                        If StringCompare(StringMid($s1, $i, 1), StringMid($s2, $i, 1)) = 0 Then
                                $sstr = $sstr & StringMid($s1, $i, 1)
                        Else
                                $dstr1 = $dstr1 & StringMid($s1, $i, 1)
                                $dstr2 = $dstr2 & StringMid($s2, $i, 1)
                        EndIf
                Next
        ElseIf $l1 < $l2 Then
                For $i = 1 To $l1
                        If StringCompare(StringMid($s1, $i, 1), StringMid($s2, $i, 1)) = 0 Then
                                $sstr = $sstr & StringMid($s1, $i, 1)
                        Else
                                $dstr1 = $dstr1 & StringMid($s1, $i, 1)
                                $dstr2 = $dstr2 & StringMid($s2, $i, 1)
                        EndIf
                Next
                $dstr2 = $dstr2 & StringMid($s2, $l1 + 1)
        ElseIf $l1 > $l2 Then
                For $i = 1 To $l2
                        If StringCompare(StringMid($s1, $i, 1), StringMid($s2, $i, 1)) = 0 Then
                                $sstr = $sstr & StringMid($s2, $i, 1)
                        Else
                                $dstr1 = $dstr1 & StringMid($s1, $i, 1)
                                $dstr2 = $dstr2 & StringMid($s2, $i, 1)
                        EndIf
                Next
                $dstr1 = $dstr1 & StringMid($s1, $l2 + 1)
        EndIf
        Return "The Same String :" & $sstr & @CRLF & "The Different String :" & $dstr1 & "<==>" & $dstr2
EndFunc   ;==>compare

如果不是相对应位置上的比较，那么用StringInStr，还要考虑到把其中一个字符串拆开。
拆开还要考虑：一个一个拆开，两个两个拆开……N个N个拆开……。
拿"12345678”举例，两个两个拆开，还要考虑到又分为
(一)：12，34，56，……
(二)：12，23，34，……
太麻烦，题目太大，楼主根据自己的要求再细化考虑一下吧。~

xdafeng

谢谢！！就要这种效果