Ohjelmassa on useampi satunnaisluku, jotka lomakkeen latauksessa laskevat satunnaisluvun oikein. Siihen asti pelaa hyvin.
Mutta jos lähden muuttamaan (hakemaan ) uutta satunnaslukuarvoa, antaa se aina caption arvoksi 0:n
eli jos painan uudestaan Command1-nappulaa antaa se aina arvoksi 0
Kuinka voin sijoittaa satunnaislukutuloksen, a (= command1.captio-arvo)
laskentakaavaan tai muuttujaan siten, että Rnd funktio toimisi edelleen eli stunnaislukua voisi muutella lomakkeen ollessa auki?
Private Sub Command1_click()
a= Int(Rnd*10)
Command1.caption = a
summa1= a text1.text
'Seuraava Command1-painallus antaa arvon 0
a=0
Command1.caption=0
......
edelleen satunnaisluvuista
Rnd
2
335
Vastaukset
- jees
Mitä oikein ajat takaa? Sinulla on joku globaali muuttuja summa1, minkä arvoon haluat lisätä text1-komponentin arvon ja satunnais luvun? Mietipä uudelleen?
1. a= Int(Rnd*10)
2. Command1.caption = a
3. summa1= a text1.text
4. a=0
5. Command1.caption=0
Onko tämä mitä haluat?
1. a= Int(Rnd*10)
2. Command1.caption = a
Vai
1. a= Int(Rnd*10)
2. Command1.caption = a
3. summa1 = a text1.text
4. Command1.caption = summa1
Vai jotain muuta hämärää. Kannattaa kirjoittaa paperille jokainen muuttuja ja miettiä askel askeleelta kuinka niitä täytyy muuttaa oikeaan lopputulokseen. Kyllä se siitä...- rnd
esimerkki oli huolimattomasti kirjoitettu.
(tarkoitin jälkimmäistä jees:n vaihtoehdoista)
Rnd toimii eka kerralla, mutta sen jälkeen se antaa aina arvoksi 0.
ko Ohjelmassa on useampia objekteja rivissä. Objektien arvoa muutetaan painamalla ko. objektia (esim 0:sta 9:ään) ja kaikien objektien click-ohjelma on määritelty staticiksi.
Samaan riviin on otettu myös muutamia objekteja, joiden arvo määrittyy satunnaisluvun mukaan. Koko rivin objektien arvoista suoritetaan laskutoimitus esim rivin summa.
Eka kerralla kaikki on ihan ok. Mutta yrittäessäni uusia kertoja vaihtaa satunnaislukua clickkaamalla sitä, tulee ko objektin satunnaisluvun arvoksi aina 0 vaikka clikkaisi sitä kuinkamonta kertaa tahansa.
???
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Epäily: Oppilas puukotti kolmea Pirkkalan koululla
Tämänhetkisen tiedon mukaan ainakin kolme oppilasta on loukkaantunut puukotuksessa Pirkkalan Vähäjärven koululla. Myös e2166032Jos olisit täällä
Tosin en tiiä miks oisit. (Ja hävettää muutenkin kun ei muka muulla tavoin osaa kertoa tätäkään) Jos jollain pienellä492705- 1562262
Jos yhdistät nimikirjaimet
Jos yhdistät sinun ja kaivattusi ensimmäisten nimien alkukirjaimet mitkä nimikirjaimet tulee? Sinun ensin ja sitten häne412102Kesän odotuksia hyrynsalmella
Kyllä kesällä hyrynsalmellakin on mahdollisuus osallistua kylän menoon monella tavalla . On kaunislehdon talomuseolla161779- 821414
Pirkkalan koulussa puukotus, oppilas puukotti kolmea
Ilmeisesti tyttöjä ollut kohteena.1621397Voi Rakas siellä
Olet ollut mun ajatuksissa taas koko päivän. Olet ihmeellinen kertakaikkiaan ja arvostan sinua niin paljon❤️Minulla ei o241321Ohhoh! KAJ laukoi suorat sanat somessa - V-sana mainittu!
Ohhoh! Mitäs mieltä olet tästä huumoriryhmä KAJ:sta? Bara bada bastu on kyllä aikamoinen korvamato... Lue lisää: https351281Erika selvisi hienosti ennakkosuosikin paineista
Hienostihan se meni. Erika jätettiin yksin, eikä häntä tuettu, oli euroviisukiusattu, silti suoriutui ensiluokkaisesti.1091007