Forum Coders' city Strona Główna Coders' city
Nasza pasja to programowanie!
 

 PomocPomoc   SzukajSzukaj   UżytkownicyUżytkownicy   GrupyGrupy  RejestracjaRejestracja 
Archiwum starego forum + teoria    RSS & Panel/SideBar
 ProfilProfil   Zaloguj się, by sprawdzić wiadomościZaloguj się, by sprawdzić wiadomości   ZalogujZaloguj 

Potrzebuję szybkiej odpowiedzi na moje pytanie... Skrócony regulamin

[VB6] Przeglądarka w visual basic 6

Idź do strony Poprzedni  1, 2, 3, 4, 5

 
Odpowiedz do tematu    Forum Coders' city Strona Główna -> Visual Studio
Zobacz poprzedni temat :: Zobacz następny temat  
Autor Wiadomość
samolot



Dołączył: 26 Sty 2006
Posty: 5404
Skąd: Toruń

PostWysłany: Pon Lut 13, 2012 12:01 am      Temat postu: Odpowiedz z cytatem Pisownia

Nie masz racji z tym stwierdzeniem:
Cytat:
Case'm byś tego nie załatwił ;)

Wymieniliśmy poglady, każdy pozostał przy swoim, nikt sie niczym nie bulwresuje.
Ty uważsz, że tak, ja uważam, że nie. Każdy wie swoje. Ja swoje twierdzenie o Case uzasadniłem,
a Twoja odpowiedź jest w sylu, że nie , bo nie. Nie ma o co strzępić klawiatury.

_________________
Vista SP2+VB 2008 EE + .NET 3.5 + IE 9.0.8112 /431 przykładowych programów do Warsztatu programisty (Helion)
W życiu bowiem istnieją rzeczy , o które warto walczyć do samego końca. (P. Coelho)
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email
mikmas



Dołączył: 26 Maj 2005
Posty: 5617
Skąd: From Alex Stadt

PostWysłany: Pon Lut 13, 2012 6:56 am      Temat postu: Odpowiedz z cytatem Pisownia

Bardziej mi chodzi o to, że napisałeś, że case jest lepszy od if. Zapytałem się dlaczego. Odpowiedziałeś:
Cytat:
Poza tym pierwszy przypadek Case eliminuje tylko pusty ciąg.
Do listy były dopisywane Nazwy Własne obiektów, a użytkownik mogł sie pomylić,
więc można byłoby dopisć dalsze warunki Case :
- aby zwrócić uwagę na wpisane nawy z małej litery.
- aby zwrócić uwagę na przypadkowe rozpoczecie nazwy od cyfry.

To się pytam, jak byś to załatwił casem to? Bo traktuję to jako argument, że jest jednak potrzebny ;) - jeżeli by załatwił, to faktycznie mógłbym go stosować w swoich programach, bo dotychczas każde z tych sprawdzeń musiało być rąbane oddzielnym ifem

_________________
-----BEGIN GEEK CODE BLOCK-----
Version: 3.1
GCS d- s---:--->+:+ a-->--- C++(+++) U-- P+ L-- E--
W++ N+ o-- K- w++(+++) O--- M-(--) V-- PS PE++ Y
PGP- t 5 X++ R tv- b+ DI- D+++(++++) G++ e h* r+ y?
------END GEEK CODE BLOCK------
Alternatywny komunikator GG
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email Odwiedź stronę autora Numer GG Tlen
Marcin_Miga



Dołączył: 09 Lis 2005
Posty: 2247

PostWysłany: Pon Lut 13, 2012 8:25 am      Temat postu: Odpowiedz z cytatem Pisownia

Kod:
Option Compare Binary
Sub t()
Dim s$, r$

s = "4labama dak0ta"
Select Case True
    Case s Like "[0-9]*": r = "s zaczyna się cyfrą"
    Case s Like "*[0-9]*": r = "s zawiera cyfry"
    Case s Like "[a-z]*": r = "s zaczyna się małą literą"
    Case UCase(s) Like "*[ĄĆĘŚŁŃÓŻŹ]*": r = "S zawiera PLiterki"
    
End Select

MsgBox r
End Sub

Nie twierdzę, że Case jest lepszy od IF. Sam bym osobiści załatwił to Ifami. To tylko taka mała wprawka, by się sprawdzić... Ale szczerze wątpię, by samolot używał taki kod...

pozdrawiaMM
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email Tlen
mikmas



Dołączył: 26 Maj 2005
Posty: 5617
Skąd: From Alex Stadt

PostWysłany: Pon Lut 13, 2012 8:34 am      Temat postu: Odpowiedz z cytatem Pisownia

Hahaha cwane, cwane :D. Jeżeli warunek z Case przyjmie True to wtedy będzie zgodny z Select Case (True == True), jednak nie radziłbym szczerze mówiąc używać takiego rozwiązania ;)
_________________
-----BEGIN GEEK CODE BLOCK-----
Version: 3.1
GCS d- s---:--->+:+ a-->--- C++(+++) U-- P+ L-- E--
W++ N+ o-- K- w++(+++) O--- M-(--) V-- PS PE++ Y
PGP- t 5 X++ R tv- b+ DI- D+++(++++) G++ e h* r+ y?
------END GEEK CODE BLOCK------
Alternatywny komunikator GG
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email Odwiedź stronę autora Numer GG Tlen
samolot



Dołączył: 26 Sty 2006
Posty: 5404
Skąd: Toruń

PostWysłany: Pon Lut 13, 2012 7:34 pm      Temat postu: Odpowiedz z cytatem Pisownia

Marcin_Miga: nie jestem zawodowym programistą, jak ty, 12 lat temu tak bym nie napisał.
_________________
Vista SP2+VB 2008 EE + .NET 3.5 + IE 9.0.8112 /431 przykładowych programów do Warsztatu programisty (Helion)
W życiu bowiem istnieją rzeczy , o które warto walczyć do samego końca. (P. Coelho)
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email
Marcin_Miga



Dołączył: 09 Lis 2005
Posty: 2247

PostWysłany: Pon Lut 13, 2012 10:27 pm      Temat postu: Odpowiedz z cytatem Pisownia

12 lat temu JESZCZE nie programowałem w VB, a teraz JUŻ nie programuję w VB. :)
Powrót do góry
Zobacz profil autora Wyślij prywatną wiadomość Wyślij email Tlen
Wyświetl posty z ostatnich:   
Odpowiedz do tematu    Forum Coders' city Strona Główna -> Visual Studio Wszystkie czasy w strefie CET (Europa)
Idź do strony Poprzedni  1, 2, 3, 4, 5
Strona 5 z 5

 
Skocz do:  
Możesz pisać nowe tematy
Możesz odpowiadać w tematach
Nie możesz zmieniać swoich postów
Nie możesz usuwać swoich postów
Nie możesz głosować w ankietach
Możesz dodawać załączniki na tym forum
Możesz pobierać pliki z tego forum




Debug: strone wygenerowano w 0.09130 sekund, zapytan = 7
contact

| Darmowe programy i porady Jelcyna | VB4all | Tansze zakupy w Helionie |