vb如何用for循环打印菱形