1. Liebe Forumsgemeinde,

    aufgrund der Bestimmungen, die sich aus der DSGVO ergeben, müssten umfangreiche Anpassungen am Forum vorgenommen werden, die sich für uns nicht wirtschaftlich abbilden lassen. Daher haben wir uns entschlossen, das Forum in seiner aktuellen Form zu archivieren und online bereit zu stellen, jedoch keine Neuanmeldungen oder neuen Kommentare mehr zuzulassen. So ist sichergestellt, dass das gesammelte Wissen nicht verloren geht, und wir die Seite dennoch DSGVO-konform zur Verfügung stellen können.
    Dies wird in den nächsten Tagen umgesetzt.

    Ich danke allen, die sich in den letzten Jahren für Hilfesuchende und auch für das Forum selbst engagiert haben. Ich bin weiterhin für euch erreichbar unter tti(bei)pcwelt.de.
    Dismiss Notice

VB.net: Rnd()

Discussion in 'Programmieren' started by X-Stream, Feb 6, 2009.

Thread Status:
Not open for further replies.
  1. X-Stream

    X-Stream Byte

    Ich möchte mit VB eine Zahl aus dem halboffenen Intervall ]0,20] oder [0,20[ erzeugen.
    (d.h. einschließlich null aber außschließlich zwanzig & andersrum)
    Geht das mit der Rnd() Funktion irgendwie?
    Rnd erzeugt nämlich nur Zahlen aus dem offenen Intervall ]0,1[.

    Momentan verwende ich
    Code:
    Randomize()
Dim random as Single = Rnd() * 20
    Danke ;)
     
    X-Stream, Feb 6, 2009
    #1
  2. kazhar

    kazhar Viertel Gigabyte

    ich dachte bei Rnd() kommt die 1 nie vor?
    also [0..1[

    [0..20[ Dim random as Single = Rnd() * 20
    ]0..20] Dim random as Single = 20 - (Rnd() * 20)
     
    kazhar, Feb 6, 2009
    #2
  3. VB-Coder

    VB-Coder Megabyte

    Code:
    Dim Zufallszahl
Randomize
Zufallszahl = Int((19 * Rnd))
     
    VB-Coder, Feb 8, 2009
    #3
  4. kazhar

    kazhar Viertel Gigabyte

    er will aber ein single...
     
    kazhar, Feb 8, 2009
    #4
  5. X-Stream

    X-Stream Byte

    OK, bei MSDN stand "zwischen 0 und 1" also hatte ich vermutet dass es auch immer nur größer 0 gibt.
    Danke ;)
     
    X-Stream, Feb 10, 2009
    #5
Thread Status:
Not open for further replies.

Share This Page