Strona: [  << <   1   > >>  ]  z  1     
Autor Temat: pytanko o stringi :)
Dagged
Dagged




Typ: neutral
Postów: 49
Zarejestrowany: Dec 2003
pytanko o stringi :)

Cze. jaka jest najlepsza metoda aby porównać stringi (nie majteczki!!!) . Mam dwie etykiety i chce sprawdzać czy Caption tych etykiet sie roznią. Jak to zrobic? Czy zliczac ilosc liter? Ale to nie najlepsze rozwiazanie. dzieki za wszelkie sugestie.
pozdrowionka


_____________________________________________
May the Force be with you...

17-04-2004 12:21
Pokaż profil Dagged  Wyślij email do Dagged        1728948
andrey
Łódź



Typ: neutral
Postów: 295
Zarejestrowany: Mar 2003

Nie wiem dokładnie o co ci chodzi ale najprostszym sposobem na porównywanie dwóch łańuchów znaków w vb jest funkcja StrComp oto link do artykułu w dziale teoria http://www.coderscity.pl/no-vb4all/teoria/iso2/funkcje/tekstowe/strcomp.htm
Abysmy mogli ci udzielic dobrej odpowiedzi powiedz dokładnie co chcesz wiedziec porownujac te dwa łańcuchy? Jaki ma być wynik twoich poszukiwań? Chcesz wiedzieć który jest dłuższy?, który ma wiecej samoglosek/wspolglosek? Czy wyraz jest taki sam czy moze rozni sie koncowka? Sprecyzuj to troche.


_____________________________________________
http://www.carbondesign.pl/ - rowery poziome, trójkołówce, handbike-i, tuning, akcesoria

17-04-2004 15:46
Pokaż profil andrey  Wyślij email do andrey   Odwiedź stronę andrey       3078613
Dagged
Dagged




Typ: neutral
Postów: 49
Zarejestrowany: Dec 2003

chec wiedziedz czy wyrazy sa takie same


_____________________________________________
May the Force be with you...

17-04-2004 20:14
Pokaż profil Dagged  Wyślij email do Dagged        1728948
bisiek




Typ: neutral
Postów: 487
Zarejestrowany: Jul 2003

Tak jak na liczbach "text1" = "text2" nie będzie prawdą, "text1" = "text1" będzie prawdą


_____________________________________________
www.mob.abc.pl - moja strona o VB

17-04-2004 20:24
Pokaż profil bisiek  Wyślij email do bisiek   Odwiedź stronę bisiek       3380672
Viper87



Typ: neutral
Postów: 490
Zarejestrowany: Oct 2002

EEEEE... chyba nie chodzi Ci o:

If label1.caption<>label2.caption then msgbox "Te stringo nie są takie same!"


_____________________________________________
Viper

"Savoir c`est prevoir, prevoir c`est prevenir". 
(Wiedzieć to przewidzieć, przewidzieć to zapobiegać) 


17-04-2004 20:49
Pokaż profil Viper87  Wyślij email do Viper87   Odwiedź stronę Viper87  
Dagged
Dagged




Typ: neutral
Postów: 49
Zarejestrowany: Dec 2003

sytuacja jest taka :
form1.label1.caption = "ala ma kota"
form1.label2.caption = "ala nie ma kota"
stringi te zmieniaja sie automatycznie przy wybraniu pewnych opcji. I teraz chodzi mi zeby za karzdym razem porownywaz je i jesli sa takie same to cos tam. Wiem jak zrobic pętle idt. ale kiedy wpisuje warunek
if me.label1.caption<>me.label2.caption then....
to niedziała. Mysle ze StrComp pomoze ale jak macie jeszcze jakies spostrzezenia to prosze
pozdrowionka


_____________________________________________
May the Force be with you...

17-04-2004 21:16
Pokaż profil Dagged  Wyślij email do Dagged        1728948
Viper87



Typ: neutral
Postów: 490
Zarejestrowany: Oct 2002

To zawsze działa, bo jest za proste... Masz gdzieś błąd w kodzie. Może to wina me? Nigdy nie wiadomo co to dla VB oznacza w danym momencie... Prześlij mi ten kod, to zobaczymy.


_____________________________________________
Viper

"Savoir c`est prevoir, prevoir c`est prevenir". 
(Wiedzieć to przewidzieć, przewidzieć to zapobiegać) 


17-04-2004 21:19
Pokaż profil Viper87  Wyślij email do Viper87   Odwiedź stronę Viper87  
Dagged
Dagged




Typ: neutral
Postów: 49
Zarejestrowany: Dec 2003

Dzieki wszystkim juz działa
pozdrawiam

[Post edytowany dnia 17-04-2004 21:23 przez Dagged]


_____________________________________________
May the Force be with you...

17-04-2004 21:23
Pokaż profil Dagged  Wyślij email do Dagged        1728948
andrey
Łódź



Typ: neutral
Postów: 295
Zarejestrowany: Mar 2003

Mimo że temat jest juz nieaktualny to postanowiłem napisać że do porównywania łańcuchów znaków ,ożna użyć API Oto deklaracja:
Private Declare Function lstrcmpi Lib "kernel32" Alias "lstrcmpiA" _
    (ByVal lpString1 As String, ByVal lpString2 As String) As Long
By użyć przykładu wstaw dwa pola tekstowe i jeden przycisk:
' W sekcji general wpisz:
Dim s1 As String
Dim s2 As String

Private Sub Command1_Click()
s1 = Text1.Text
s2 = Text2.Text
If lstrcmpi(s1, s2) = 0 Then
    MsgBox ("Łańcuchy są identyczne"
End If
End Sub
Funkcja zwraca 0, gdy łańcuchy są identyczne. Nie wiem czy funkcja ta działa szybciej ale jest kolejnym przykładem może sie komuś przyda.
Powodzenia


_____________________________________________
http://www.carbondesign.pl/ - rowery poziome, trójkołówce, handbike-i, tuning, akcesoria

19-04-2004 15:56
Pokaż profil andrey  Wyślij email do andrey   Odwiedź stronę andrey       3078613
Wszystkich odpowiedzi: 8 :: Maxymalnie na stronę: 20
Strona: [  << <   1   > >>  ]  z  1