16.01.2018 12:49
[#32]
Re: [Hollywood] CompareStr
@recedent, post #10
MidStr() podałem alternatywnie do Left(), ale oczywiście lepiej użyć Left() w tak prostym przykładzie. Przeczytałem już, że problem z CompareStr() występuje w zależności od środowiska, ale ja mimo wszystko wykorzystałbym porównania ręcznego dwóch ciągów tekstowych w połączeniu z UpperStr() lub LowerStr() (jakiś odpowiednik na pewno istnieje w Hollywoodzie), a zrobiłbym to tak:
Ta metoda jest prosta, ale chodzi przecież o porównanie dwóch prostych ciągów tekstowych. Gdyby zaś miało być to bardziej wyrafinowane, to zastosowałbym InStr() do wyszukania słowa-klucza z odpowiedzi użytkownika, aby wyciągnąć pożądane słowo (ale wciąż z zastosowaniem UpperStr() lub LowerStr()).
sPyt$="Najlepszy komputer świata?"
sOdpJedynieSluszna$="Amiga"
sOdp$=InKeyStr (#ALPHABETICAL)
If UpperStr (sOdp$)=UpperStr (sOdpJedynieSluszna$)
Print ("Nie inaczej")
Else
Print ("Zapewne chciałeś napisać:" + sOdpJedynieSluszna$)
EndifTa metoda jest prosta, ale chodzi przecież o porównanie dwóch prostych ciągów tekstowych. Gdyby zaś miało być to bardziej wyrafinowane, to zastosowałbym InStr() do wyszukania słowa-klucza z odpowiedzi użytkownika, aby wyciągnąć pożądane słowo (ale wciąż z zastosowaniem UpperStr() lub LowerStr()).
) 
