Dim str1 As String
Dim str2 As String
str1="あいうえお" '←何らかの方法で呼び出した文字列
str2="あいうえお" '←上とは他の方法で呼び出した文字列
If ??? then
Text1.Text="一致しました" 'str1とstr2が一致
Else
Text1.Text="一致しません" 'str1とstr2が不一致
End If
上の???の部分がわかりません。よろしくお願いします。
環境が分からないのでなんともいえませんが…
If str1=str2 Then
では上手くいかなかったのでしょうか?
自分なら、
IF StrComp(str1, str2) = 0 THEN
Text1.Text="一致しました" 'str1とstr2が一致
ELSE
Text1.Text="一致しません" 'str1とstr2が不一致
End IF
かな、
すいません。動かない原因が他の場所にありそうなので、後で新しく質問し直します。半人前さんいなさんありがとうございました。
動かない原因、、、ひょっとして、余計なスペースが入っていて、
比較がうまくいかないとか?
問題なければTrimしてみたらいかがでしょうか?
ツイート | ![]() |