Eli tietääkö kukaan kuinka vois tehdä salasanan, jossa on useampi salasana.
Aina joka salasanasta pitäisi mennä eri formille.
Textboxia ja commandia käyttäen en saa muuta tehtyä, kun tälläsen.
If text1.text = "salasana" then
Form2.show
else
msgbox "Salasana väärin!"
End if
Tuohon kun saisi useamman salasana vaihtoehdon.
VB6 - pikku onglema
Apuk
6
251
Vastaukset
- an0n1
>2013
>Käyttää VB6
TTETT- korjaus
>2013
>Käyttää VB
TTETT
- entinenlukiolainen
Meillä koulussa käytettiin ikivanhaa Borland Pascal 7:aa ohjelmoinnin perusopetukseen. Joten siihen nähden VB:kin varmaan ajaa asiansa perusasioiden sisäistämisessä. Mihinkään vakavampaan sitä tuskin kannattaa edes harkita.
Sata ihviä
Piirretään "formille" tekstiboksi ja komentonappi
ja kirjoitetaan komentonapille allaoleva koodi.
Messageboxien tilalle sijoitetaan haluttu toiminto.
(Else-käskyn kanssa ei kannata pelleillä jos
vaihtoehtoja on useita.)
Private Sub Command1_Click()
Dim annettu_sana As String
annettu_sana = Text1.Text
if annettu_sana= "matti" then
MsgBox "terve matti"
end if
if annettu_sana= "masa" then
MsgBox "terve masa"
end if
if annettu_sana= "jussi" then
MsgBox "terve jussi"
end if
if annettu_sana= "ossi" then
MsgBox "terve ossi"
end if
End SubSata selectiä
Piirretään "formille" tekstiboksi ja komentonappi
ja kirjoitetaan komentonapille allaoleva koodi.
Messageboxien tilalle sijoitetaan haluttu toiminto.
Private Sub Command1_Click()
Dim annettu_sana As String
annettu_sana = Text1.Text
Select Case annettu_sana
Case "matti"
MsgBox "terve matti"
Case "masa"
MsgBox "terve masa"
Case "jussi"
MsgBox "terve jussi"
Case "ossi"
MsgBox "terve ossi"
Case Else
MsgBox "ei kukaan kotona"
End Select
End Sub- visual bashit
Ja salasanat kannattaa tietysti aina koodata staattisena selväkielisenä merkkijonona :)
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Ensitreffit Jenni laukoo viinilasin ääressä suorat sanat Jyrkin aikeista: "Mä sanoin, että älä"
Voi ei… Mitä luulet: kestääkö Jennin ja Jyrkin avioliitto vai päättyykö eroon? Lue lisää: https://www.suomi24.fi/viihde272870Ymmärrän paremmin kuin koskaan
Roikut kädessäni ja vedät puoleesi. Näen kuitenkin tämän kaiken lävitse ja kaikkien takia minun on tehtävä tämä. Päästän332525- 1482274
Hullu liikenteessä?
Mikä hullu pyörii kylillä jos jahti päällä? Näitä tosin kyllä riittää tällä kylällä.542239Niina Lahtinen uudessa elämäntilanteessa - Kotiolot ovat muuttuneet merkittävästi: "Nyt on...!"
Niina, tanssejasi on riemukasta seurata, iso kiitos! Lue Niinan haastattelu: https://www.suomi24.fi/viihde/niina-lahti241860Kun Venäjä on tasannut tilit Ukrainan kanssa, onko Suomi seuraava?
Mitä mieltä olette, onko Suomi seuraava, jonka kanssa Venäjä tasaa tilit? Ja voisiko sitä mitenkään estää? Esimerkiks3901696Ano Turtiainen saa syytteet kansankiihoituksesta
Syytteitä on kolme ja niissä on kyse kirjoituksista, jotka hän on kansanedustaja-aikanaan julkaissut Twitter-tilillään1041642- 3091548
- 1351459
Varokaa! Lunta voi sataa kohta!
Vakava säävaroitus Lumisadevaroitus Satakunta, Uusimaa, Etelä-Karjala, Keski-Suomi, Etelä-Savo, Etelä-Pohjanmaa, Pohjanm131446