vbscript - vbs で 2 つの文字列を比較しているときに、Trim 関数が文字列の末尾にあるスペースを削除しない

Question

2 つの文字列を取り、それらを比較する単純なスクリプトがあります。最初のものは最後にスペースがあり、2 つ目はスペースがありません。

Function compare(str1,str2)
 dim a 
 If strComp(trim(str1),trim(str2))=0 Then 
     msgbox "OK"
     a=1  
 Else
     msgbox "KO" 
     a=0
 End If    

 compare=a

End Function

この関数を次のように使用します。

s1=     SUCCESSFULLY CONNECTED
s2=     SUCCESSFULLY CONNECTED
result=compare(s1,s2)

s1 と s2 の違いは、s1 は 1 つのスペースで終わるのに対し、s2 は最後にスペースがないことです。これが、Trim 関数を使用してそのスペースを無視する理由です。それにもかかわらず、s1 と s2 の場合、ダイアログ ボックスに常に「KO」というメッセージが表示されます。私は条件さえ変えました

If trim(str1)=trim(str2) Then

しかし、ポップアップはまだ「KO」を返します。これは素晴らしい状況です！

この状況を理解していただけると幸いです。前もって感謝します