oyunu

Dim sayi, s As Integer Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Randomize() sayi = Val(TextBox1.Text) + Rnd() * (Val(TextBox2.Text) - Val(TextBox1.Text)) ListBox1.Items.Clear() TextBox4.Text = 0 TextBox5.Text = 10 s = 0 End Sub...