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

629

    Vastaukset

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

      Mikä tässä on ns ongelma?

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

    Luetuimmat keskustelut

    1. Tänään pyörit ajatuksissa enemmän, kun erehdyin lukemaan palstaa

      En saisi, silti toivon että sinä vielä palaat ja otetaan oikeasti selvää, hioituuko särmät ja sulaudummeko yhteen. Vuod
      Ikävä
      22
      5124
    2. Huomenta ihana

      Kauniskasvoinen ihanuus 😘 saan sut vielä
      Ikävä
      25
      4278
    3. Hei rakas...

      Miten on työpäivä sujunut? Rakastan sinua 💗
      Ikävä
      27
      2441
    4. Edelleen sitä on vaikea uskoa

      Että olisit oikeasti rakastunut muhun
      Ikävä
      34
      2234
    5. Toiveikas vai toivoton

      torstai? Ajatuksia?
      Ikävä
      37
      1988
    6. Vitsi mihin menit. Heti takasin.

      Mä näin sut tuu takasin! Oli kiire, niin en ehtiny sin perään!
      Ikävä
      15
      1908
    7. En ole koskaan kokenut

      Ennen mitään tällaista rakastumista. Tiedän että kaipaan sinua varmaan loppu elämän. Toivottavasti ei tarvitsisi vain ka
      Ikävä
      19
      1587
    8. Mukavaa päivää

      Mun rakkauden kohteelle ❤️ toivottavasti olet onnellinen
      Ikävä
      12
      1521
    9. Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...

      Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons
      Suomalaiset julkkikset
      21
      1237
    10. Kerranki asiat oikein

      Ilkka ja muut pienpuolueeet...teitte hyvän työn kun valitsitte pätevän henkilön virkaan eikä kepulle passelia!! Jatkakaa
      Haapavesi
      10
      1164
    Aihe