Nested For Next Loops

I need to write a simple program in VB that prints a Diamond Shape on the form, using For next reptition structures. The size should be about 9 rows/columns in courier bold.