¡Cómo usar VB para imprimir un triángulo isósceles * * * * * * * * como este! ¡Isósceles!

Cree un nuevo proyecto, agregue el control comando1 y copie mi código. vb6.xp pasó la depuración.

El código es el siguiente

Subcomando privado 1_Click()

Marcar I como un número entero

Imprimir espacio (10)"* "

Para i = 1 a 9

Imprimir espacio (10 - i)" * " & espacio (I * 2)& "*"

Siguiente yo

Para i = 0 a 21

Imprimir "*";

Siguiente yo

Conector final