Vba koodaus apua

tyhmääkintyhmempi

Miten pitäsi tehdä tämmöinen asia, pitäis tehdä painike lomakkeelle jolla pitää
Esittelllä 5 muuttujaa:
Aika , tyyppi päivämäärä
Kokluku , tyyppi positiivinen kokonaisluku
AvoinnaAika1 , tyyppi merkkijono
AvoinnaAika2 , tyyppi merkkijono
AvoinnaAika3 , tyyppi merkkijono
Anna 3 viimeiselle muuttujalle arvot:
Suljettu
8:00 - 16:00
10:00 - 13:00
huomaa string-tyypin muuttujatietojen ympärysmerkit
Sitten Anna Aika-muuttujalle arvoksi kuluva hetki (esimerkki löytyy lähiopintomateriaalista (Nyt, elikkäs….) ja Kokluku-muuttujalle
WeekDay funktiolla (kts VB help sinisen kysymys-painikkeen takaa ja katso ensimmäisen helpin esimerkkikoodi helpin lopusta)
ja seuraavaksi Tee kahdella erilaisella tavalla (voi tehdä koodissa peräkkäin) valintalausekkeella MsgBox eli ponnahdusikkuna, joka sanoo
Weekday arvon ollessa 1 (elikkäs sunnuntai) tekstin Avoinna sunnuntaisin:ja AvoinnaAika1:n arvon. Käytä tulostuksessa &-merkkiä, esimerkki lähipäivämateriaalissa.
Weekday arvon ollessa 6 (elikkäs lauantai) tekstin Avoinna lauantaisin:ja AvoinnaAika3:n arvon. Käytä tulostuksessa &-merkkiä, esimerkki lähipäivämateriaalissa.
Weekday arvon ollessa muutekstin Avoinna arkisin:ja AvoinnaAika2:n arvon. Käytä tulostuksessa &-merkkiä, esimerkki lähipäivämateriaalissa.
5. Testaa koodisi toimivuus Visual Basic ikkunan ylävalikon Debug

1

598

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • 2*19

      Mikä tässä on ns ongelma?

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Takaisin ylös

    Luetuimmat keskustelut

    1. Suomi on täysin sekaisin

      Jo ties monettako päivää hirveä itku ja poru jostain helvetin nilviäisistä. https://www.is.fi/taloussanomat/art-2000010
      Maailman menoa
      459
      4950

    2. Ensimmäisestä kohtaamisesta saakka

      minulla on ollut hämmentynyt olo. Miten voit tuntua siltä, että olisin tuntenut sinut aina? Sinun kanssasi on yhtä aikaa
      Ikävä
      15
      1762

    3. Aivan täysin tahallinen teko

      Ei mitään puolusteluja, eikä selittelyitä. Kuljettajalle kerrottiin asiasta siinä paikanpäällä, mutta silti hän ajoi ves
      Suomussalmi
      94
      1488

    4. Olet saanut minut sekoamaan

      Tunteiden ristiaallokossa vellominen on ollut melkoinen kokemus. Ei kukaan ole saanut minua niin raiteiltaan kuin sinä.
      Ikävä
      23
      1377

    5. Suomussalmi saatu vihdoin maailmankartalle!

      Nyt kun Suomussalmi on vihdoin viimein saatu ennennäkemättömällä tavalla maailman tietoisuuteen niin voitaisiin järjestä
      Suomussalmi
      53
      1369

    6. Mainehaitta metsäkonefirmalle

      Hukkajoen tapahtumista liikkuu paljon huhuja. Eikö kannattaisi julkaista raakkuja tuhonneen metsäkoneyrityksen nimi, kos
      Suomussalmi
      53
      1258

    7. Oho! Maajussi-Kallelta pakit saanut morsioehdokas Miss Suomi -kisoissa! Tunnistaisitko hänet nyt?

      Hmm, tunnistaisitko?!? Onnea missihulinoihin! Lue lisää ja katso kuvat: https://www.suomi24.fi/viihde/oho-maajussi-
      Suomalaiset julkkikset
      0
      1085

    8. Myönnän sinulle nyt

      Että olen erittäin mustasukkainen sinusta jo nyt. Ikävä on tämä tunne, kun tietämättömyyden solista nousee myrkkyä miele
      Ikävä
      54
      1030

    9. Pysytäänkö nainen

      edelleen yhtä viileän tyynenä kun nähdään. Uskotko että tahtoessani saisin murettua tyyneytesi hyvin helposti.
      Ikävä
      57
      905

    10. Olen käyttäytynyt ristiriitaisesti

      eikä minusta varmaankaan ota mitään selvää. Se johtuu siitä, kun järki sanoo ei, ei, ei ja sydän sanoo kyllä, kyllä, kyl
      Ikävä
      62
      904
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt