VB6 - pikku onglema

Apuk

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.

6

325

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 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 Sub

    • Sata 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

    1. Mitään järkeä?

      Että ollaan erillään? Kummankin pää on kovilla.
      Ikävä
      129
      2073
    2. Noniin rakas

      Annetaanko pikkuhiljaa jo olla, niin ehkä säilyy vienot hymyt kohdatessa. En edelleenkään halua sulle tai kenellekään mi
      Ikävä
      105
      1886
    3. Kumpi vetoaa enemmän sinuun

      Kaivatun ulkonäkö vai persoonallisuus? Ulkonäössä kasvot vai vartalo? Mikä luonteessa viehättää eniten? Mikä ulkonäössä?
      Ikävä
      84
      1659
    4. Lasten hyväksikäyttö netissä - Joka 3. nuori on saanut seksuaalisen yhteydenoton pedofiililtä

      Järkyttävää! Lapsiin kohdistuva seksuaalinen hyväksikäyttö verkossa on yhä pahempi ongelma. Ulkolinja: Lasten hyväksikäy
      Maailman menoa
      64
      1534
    5. Multa sulle

      Pyörit 24/7 mielessä, kuljet mun mukana, mielessä kyselen sun mielipiteitä, vitsailen sulle, olen sydän auki, aitona. M
      Ikävä
      33
      1202
    6. Ei se mene ohi ajan kanssa

      Näin se vaan on.
      Ikävä
      84
      1173
    7. Nainen, olen tutkinut sinua paljon

      Salaisuutesi ei ole minulle salaisuus. Ehkä teimme jonkinlaista vaihtokauppaa kun tutkisimme toisiamme. Meillä oli kumm
      Ikävä
      56
      1132
    8. Tavoitteeni onkin ärsyttää

      Sua niin turhaudut ja unohdat koko homman
      Ikävä
      110
      1103
    9. Mies, eihän sulla ole vaimoa tai naisystävää?

      Minusta tuntuu jotenkin, että olisit eronnut joskus, vaikka en edes tiedä onko se totta. Jos oletkin oikeasti edelleen s
      Ikävä
      47
      1076
    10. Onko sulla empatiakykyä?

      Etkö tajua yhtään miltä tämä tuntuu minusta? Minä ainakin yritän ymmärtää miltä sinusta voisi tuntua. En usko, että olet
      Ikävä
      44
      1023
    Aihe