Forum Eks Grupy…

Private Sub userform_initialize()
Randomize
x = Round(10 * Rnd())
y = Round(10 * Rnd())
UserForm1.TextBox1.Text = x
UserForm1.TextBox2.Text = y
UserForm1.TextBox3.Text = " "
li = 0
pkt = 0
UserForm1.TextBox4.Text = pkt
UserForm1.TextBox5.Text = li
LT = Val(UserForm1.TextBox6.Text)