Visual Basic generieren Zufallszahl

Question

Ich bin neu in der Codierung und ich möchte ein einfaches Programm, das ein Fenster an einen zufälligen Speicherort auf Ihrem Desktop verschiebt. Im Moment ist mein Code folgendermaßen aus:

Me.Location = New Point(27, 55) 
    Me.Location = New Point(502, 624) 
    Me.Location = New Point(858, 477) 
    Me.Location = New Point(564, 50) 
    Me.Location = New Point(898, 41) 
    Me.Location = New Point(468, 944) 
    Me.Location = New Point(417, 7) 
    Me.Location = New Point(841, 697) 
    Me.Location = New Point(953, 438) 

ich mich im Code setzen musste, damit es nie völlig zufällig sein wird und sich immer wiederholen. Wie mache ich die Zahlen zu einer Zufallszahl?

Answer 1

Zuerst diese Variable im Gültigkeitsbereich der Klasse erklären:

Dim rnd As New Random 

Dann diesen Code setzen in was Ereignis Sie das Fenster in eine zufällige Position einzustellen verwenden:

Me.Location = New Point(rnd.Next(0, My.Computer.Screen.WorkingArea.Width - Me.Width), rnd.Next(0, My.Computer.Screen.WorkingArea.Height - Me.Height)) 

Dies wird auch dafür sorgen, dass das Fenster immer innerhalb der Grenzen des Bildschirms bleiben wird, wenn gestellt eine neue zufällige Position.

Answer 2

Sie würden wahrscheinlich die Rnd() Funktion

Rnd() erzeugt eine Anzahl n, 0 < = n so verwenden, wenn Sie eine Zahl zwischen 1 und 10 generieren möchten, müssen Sie +1, als Multiplikation Rnd() mit 10 geben Ihnen Zahlen zwischen 0 und 9.