[0theghost0]

السلام عليكم

اولا : فكرة الكود انه يعطيك ارقام عشوائية ولكنني لا اريد ارقام عشوائية الفكرة بسيطة ولكنني لم اعرف لجعلها ما اريد .

الفكرة اني اريده يختار لي اسماء عشوائية قمت باضافتها مسبقا وعلما لا يقوم بختيار الاسم مرتين في اليوم فقط مرة وحدة .

الكود لاختيار الارقام عشوائية :

كود :

Public Class Form1

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Randomize()
    End Sub

    Private Sub btnRandom_Click(sender As Object, e As EventArgs) Handles btnRandom.Click
        lblRandom.Text = 0 + Int(100 * Rnd())
    End Sub
End Class