Private sub form _load( ) show randomize dim a(3,3) as integer dim i as integer dim j as integer for i = 1 to 3 for j = 1 to 3 a(i,j) = int(rnd*99)+1 picture1.print a(i,j);chr(9); next j picture1.print; Next i