Helou
Tiedättekö jotain sopivaa ohjelmaa tai netin syövereissä olevaa sivua, jonka avulla voisi tehdä oman tietovisan? Mielessä olisi sellainen, jossa olisi jokaisen kysymyksen aiheeseen liittyvä kuva ja vastaus tulisi joko kirjoittaa kokonaan itse tai monivalintana, hiukan älypään tapaan (tosin älypään visoissa ei voi lisätä omia kuvia).. Vinkkejä? Itse olen kyllä yrittänyt etsiä mutta ei oikein sellaista sopivaa ole löytänyt
Tiedättekö jotain sopivaa ohjelmaa tai netin syövereissä olevaa sivua, jonka avulla voisi tehdä oman tietovisan? Mielessä olisi sellainen, jossa olisi jokaisen kysymyksen aiheeseen liittyvä kuva ja vastaus tulisi joko kirjoittaa kokonaan itse tai monivalintana, hiukan älypään tapaan (tosin älypään visoissa ei voi lisätä omia kuvia).. Vinkkejä? Itse olen kyllä yrittänyt etsiä mutta ei oikein sellaista sopivaa ole löytänyt
Vastaukset 2
Vanhimmat
Ja vielä, että siinä olisi mahdollisuus sellaiseen, että väärän vastauksen myötä peli loppuisi siihen. Unohtui äskeisestä :)
Tuotahan voit kokeilla Excelin VBA:lla, niin ei tarvitse kummempia ohjelmointiympäristöjä asentaa.
Eli kysymykset voi kirjoitella Excel-taulukon riveille (kuvatiedosto soluun linkkinä). VBA-makroon piirtelee kysymyslomakkeen, eli kuvaboksi, vastaustekstiboxi, muutama labeli kysymyksille ja checkboksit sitten monivalintoja varten. Sitten vähäsen koodia, jolla haetaan lomakkeelle taulukosta kysymyksen tiedot ja verrataan vastauksia.
Alkuun pääsee tekemällä kysymyksille oman tietotyypin. Eli nuo arvot voisi olla sarakkeissa A1=KysymysKuvaTiedosto, B1=KysymysTeksti jne. Boolean arvoihin voi laittaa vaikka * jos oikein ja jättää tyhjäksi jos vastaus on väärä. Tutkii arvoa sitten koodissa len()-funktiolla, eli jos solussa on jotain, niin True, ja tyhjä solu olisi sitten False.
Public Type kysymys
KysymysKuvaTiedosto As String
KysymysTeksti As String
VastausTeksti As String
VastausATeksti As String
VastausA As Boolean
VastausBTeksti As String
VastausB As Boolean
VastausCTeksti As String
VastausC As Boolean
VastausDTeksti As String
VastausD As Boolean
End Type