8 luvun arpominen labeliin

ripsikampa

Eli miten saa arvottua 8 lukua yhteen labeliin? Saan vaan yhden luvun arvottua randomize -komennolla. Vai pystyykö sitä edes arpoon montaa lukua yhteen ja samaan labeliin?

3

513

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • dlp

      Private Sub Command1_Click()
      txt = ""
      For t = 1 To 8
      txt = txt Str(Rnd(10)) Chr(13) Chr(10)
      Next
      Label1.Caption = txt
      End Sub

      • ripsikampa

        .. En saanu sitä kyllä toimiin tolla koodilla. EN tiedän onko vika minussa vai koodissa. ELi onkos muuta tapaa millä sen voi saada arpomaan ne 8 eri lukua samaan labeliin...?


      • TSwiGH
        ripsikampa kirjoitti:

        .. En saanu sitä kyllä toimiin tolla koodilla. EN tiedän onko vika minussa vai koodissa. ELi onkos muuta tapaa millä sen voi saada arpomaan ne 8 eri lukua samaan labeliin...?

        sulla on siinä dlg:ssä Command1 niminen nappi???
        ja Label1 niminen tekstilaatikkovaimikäsenytsittenon

        Lainaten edellistä...
        miks ei muka toimi???
        mitä valittaa virheiksi???

        Private Sub Command1_Click()
        txt = ""
        randomize 'lisäsin tuon
        For t = 1 To 8
        txt = txt Str(Rnd(10)) Chr(13) Chr(10)
        Next
        Label1.Caption = txt
        End Sub    


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

    Luetuimmat keskustelut

    1. Valtion alijäämä = yritystukien määrä = 10 mrd. euroa

      Mutta persut eivät vaan suostu tasapainottamaan valtion budjettia, vaikka yritystuet on tiedetty haitallisiksi. Miksi p
      Maailman menoa
      108
      7745
    2. Suomi käyttää sosiaalietuuksiin suhteessa eniten rahaa koko maailmassa

      Suomi käyttää sosiaaliturvaetuuksiin enemmän rahaa suhteessa bruttokansantuotteeseen kuin mikään muu maa maailmassa. Su
      Maailman menoa
      368
      6830
    3. Grahn-Laasonen: "Kansalainen joutuu pettymään, jos demareita äänestää"

      Ministeri viittaa tuoreeseen Helsingin Sanomien juttuun, jossa demarijohtajan keinoja Suomen suunnan muuttamiseksi esite
      Maailman menoa
      74
      4207
    4. Vähän fiksumpi Nimi kisa ? :=)

      Kirjoita teidän etunimet allekkain. Jos nimissä on joku kirjain sama, poista se. Tee sama tarkistus kaikille kirjaimill
      Ikävä
      29
      3919
    5. Mikä on suurin luonne- eroavuus sinussa

      Ja kaivatussasi? Vaikuttaako se huonoon vai hyvään suuntaan siinä, että teistä voisi tulla jotain?
      Ikävä
      202
      2398
    6. Kenen haluaisit voittavan Amazing Racen: Tuomas ja Esko, Millu ja Karoliina vai Maria ja Vilma?

      Amazing Race Suomi huipentuu lauantaina finaaliin. Jäljellä on kolme paria ja tiedossa on tehtäviä, jotka järkyttävät os
      Tv-sarjat
      24
      2095
    7. Mitä haluaisit sanoa tänään hänelle?

      Rakastamallesi ihmiselle.
      Ikävä
      73
      1912
    8. Gallup: Katsotko Salkkareita tai oletko katsonut?

      Salatut elämät on suomalaisten suosikkisarja vuosikymmenestä toiseen. Salkkareiden parissa viettää aikaa sukupolvet laps
      Tv-sarjat
      19
      1803
    9. Elämäni biisi starttaa uudessa muodossa - Voi olla pettymys faneille!

      Elämäni biisi ja juontaja Katja Ståhl ovat suomalaisten suosikkeja. Lauantai-iltaisin ohjelma on vetänyt tv-katsojat arv
      Tv-sarjat
      1
      1670
    10. Amazing Race Tomas rehellisenä Esko-appiukon, 63, tilasta: "Sairastelut ja..."

      Tomas Grekov ja Esko Rotola-Pukkila ovat mukana Amazing Race Suomi -kisassa. Ja nyt vuorossa on finaali. Hankaluuksia m
      Tv-sarjat
      1
      1667
    Aihe