| informa |
| 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) |