Neatening Types.

If there is an obvious pattern, as in this case, then you don't need data.

For x = 45 To 60 Step 15
	For y = 15 To 150 Step 15
		box.box = New box
		box\x = x
		box\y = y
	Next
Next