打印以下图案，请用循环结构实现。（必须用VB编写）急用请帮忙作答。谢谢！

我不会VB，不过大体是这样：

int i = 1;
while(i<10) {
for(int j = 1; j <= i; j++) {
print("*");
}
printn("");//这行是换行用的
i = i + 2;
}

dim a as integer
for a =1 to 5
print ;tab(8+(5-a));string$(2*a-1,"*")
next

for i=1 to 5
print str(2*i-1,"*")
next i