No Errors But Program Crashing?

for our culminating activity we must make a program that uses a bunch of things etc.

i decided to go the extra mile and make sudoku.

The problem lies in generating the puzzle, the program always crashes, but there is never an error. im sure there are easy ways to make the generator, but from what we've learned this is the only way i know how to do it.


Private Sub FirstBlock()
Randomize()
intNumber(0, 0) = Int(9 * Rnd() + 1)

[Code]....

i made a function for each 3x3 square, and what happens is the block its currently on, checks for interferences horizontally, vertically, and within each 3x3 square, because computers process in order, i set it so that it only checks for previous block interferences, since this is the first 3x3 quadrant, there are no previous horizontal/verticals to check.

The code works fine, the problem is when i run it, it says its running but no form appears, i learned to use a progressbar to try and separate each 3x3 block to generate individually, to try and split the processes up 1 second at a time. the problem is, it does run, but it only generates a certain amount before it crashes, and every time its different, sometimes it generates half the puzzle, sometimes 1/3rd, sometimes only the first quadrant.