Código
Dim x As Integer x = Int(Rnd() * 10) Select Case x Case 0 PictureBox1.Image = My.Resources._1 Case 1 PictureBox1.Image = My.Resources._2 Case 2 PictureBox1.Image = My.Resources._3_1 Case 3 PictureBox1.Image = My.Resources._4 Case 4 PictureBox1.Image = My.Resources._5 Case 5 PictureBox1.Image = My.Resources._6 Case 6 PictureBox1.Image = My.Resources._7 Case 7 PictureBox1.Image = My.Resources._8 Case 8 PictureBox1.Image = My.Resources._9 Case 9 PictureBox1.Image = My.Resources._10 End Select
la imagenes contienes elementos del 1 al 10 es decir la primera tiene 1 manzana la segunda 2 y asi asta 10 y esas imagenes se generan randomicamente ahora necesito que un textbox pueda ingresar la cantidad de elementos que se visualiza en cada imagen y al darle click en un checkbox me verifique si es el numero correcto de elementos
MUCHAS GRACIAS POR SU AYUDA