VB . NET apua kaivataan

aloittelija5

Yritän tehdä yksinkertaista ohjelmaa, joka kyselee kysymyksiä inputboxeilla. Miten saisin kysymykset tulemaan satunnaisessa järjestyksessä ja niin, että kirjoittaisin esimerkiksi 20 kysymystä, mutta ohjelma kysyisi niistä vain 5 satunnaisesti? olen laittanut kysymysten tarkistukset if -lausekkeilla.

4

433

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • ripsu

      nuin niinku näin äkkiseltään..keinoja kyllä on niin paljon ku on naisiakin...
      laita ne kyssärit vaikks taulukoihin..
      dim taulu(19)
      dim rnd as new random
      dim jotain as boolean = false
      dim laskuri as int32 = 1

      taulu(0) = kysymys1
      ...
      do until jotain = true
      laskuri = 1
      luku = rnd.next(0,21)
      tämäonkysymys=taulu(luku)
      if laskuri = 5 then
      jotain = true
      else
      ..
      loop

      • muista

        Muista myös estää jotenkin saman kysymyksen palautuminen kahteen kertaan.


      • pohdintaa...
        muista kirjoitti:

        Muista myös estää jotenkin saman kysymyksen palautuminen kahteen kertaan.

        Ehkäpä esitettyjen kysymysten numerot voisi tallentaa toiseen tauluun, ja taulun kokoa voitaisiin pitää silmällä laskurilla...

        Taulua vain selattaisiin laskurin ilmoittamaan määrään asti... Ja aina verrattaisiin, että onko arvottu luku sama kuin taulun arvo X. Jos on, niin arvotaan uusi luku, jos ei jatketaan ohjelman ajoa.

        Vai onko tämä ihan typerä ajatus...


      • ....
        pohdintaa... kirjoitti:

        Ehkäpä esitettyjen kysymysten numerot voisi tallentaa toiseen tauluun, ja taulun kokoa voitaisiin pitää silmällä laskurilla...

        Taulua vain selattaisiin laskurin ilmoittamaan määrään asti... Ja aina verrattaisiin, että onko arvottu luku sama kuin taulun arvo X. Jos on, niin arvotaan uusi luku, jos ei jatketaan ohjelman ajoa.

        Vai onko tämä ihan typerä ajatus...

        Ohjelmointi on nimenomaisesti ongelmanratkaisemista. Väärää ratkaisua ei olekaan, mutta mieti asiaa helpoimman toteuttamistavan kannalta.

        Ehdottamallasi ajatuksella joudut rakentamaan silmukan sisään silmukan jota suoritetaan kunnes arvottu lukua ei löydy aputaulukosta. Ei ehkä kovin hankalaa.

        Entäs jos haluatkin kysyä vaikkapa 20 kysymystä kaikista 20:stä. Tällöinhän tietokone saa arpoa kysymyksiä kysymystaulukosta monta kertaa ennen kuin osuu viimeisin aputaulukkoon kirjaamattoman numeron kohdalle.

        Toinen vaihtoehtoehto voisi vaikkapa olla kysymystailun sekoittaminen. Käy for -loopilla taulukkosi läpi ja arvo jokaiselle kysymykselle minkä taulukkopaikan kanssa kysymys vaihdetaan.

        Arvonnan voit myös suorittaa kysymyksen esittämisen yhteydessä: kysymys[i][0]:n uusi paikka arvotaan aina kysymysten_maara -i vaihtoehdosta, jolloin arvonta ei koskaan osu vaihtamaan kysyttäväksi jo kysyttyä taulukkopaikkaa.


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

    Luetuimmat keskustelut

    1. Ja taas ammuttu kokkolassa

      Kokkolaisilta pitäisi kerätä pois kaikki ampumaset, keittiöveitset ja kaikki mikä vähänkään paukku ja on terävä.
      Kokkola
      35
      4289
    2. Kuinka kauan

      Olet ollut kaivattuusi ihastunut/rakastunut? Tajusitko tunteesi heti, vai syventyivätkö ne hitaasti?
      Ikävä
      114
      1586
    3. Milli-helenalla ongelmia

      Suomen virkavallan kanssa. Eipä ole ihme kun on etsintäkuullutettu jenkkilässäkin. Vähiin käy oleskelupaikat virottarell
      Kotimaiset julkkisjuorut
      248
      1546
    4. Helena Koivu on äiti

      Mitä hyötyä on Mikko Koivulla kohdella LASTENSA äitiä huonosti . Vie lapset tutuista ympyröistä pois . Lasten kodista.
      Kotimaiset julkkisjuorut
      218
      1400
    5. Mitä siellä ABC on tapahtunut

      Tavallista isompi operaatio näkyy olevan kyseessä.
      Alajärvi
      35
      1266
    6. Ja taas kerran hallinto-oikeus että pieleen meni

      Hallinto-oikeus kumosi kunnanhallituksen päätöksen vuokratalojen pääomituksesta. https://sysmad10.oncloudos.com/cgi/DREQ
      Sysmä
      88
      1078
    7. Löydänköhän koskaan

      Sunlaista herkkää tunteellista joka jumaloi mua. Tuskin. Siksi harmittaa että asiat meni näin 🥲
      Ikävä
      132
      1072
    8. Kun näen sinut

      tulen iloiseksi. Tuskin uskallan katsoa sinua, herätät minussa niin paljon tunteita. En tunne sinua hyvin, mutta jotain
      Ikävä
      47
      1054
    9. Purra saksii taas. Hän on mielipuuhassaan.

      Nyt hän leikkaa hyvinvointialueiltamme kymmeniä miljoonia. Sotea romutetaan tylysti. Terveydenhoitoamme kurjistetaan. ht
      Maailman menoa
      267
      1031
    10. Yhdelle miehelle

      Mä kaipaan sua niin paljon. Miksi sä oot tommonen pösilö?
      Ikävä
      62
      994
    Aihe