Question

设计一个vb编程输出一个三角形 有5行，每一行分别是1，3，5，7，9个星

Answer 1

Imports System.Console
Module Module1
Sub Main()
Dim i%,j%
For i=1 To 5
write(space(20-i))
For j=1 To i*2-1
write(" * ")
Next j
writeline
Next i
End Sub
End Module
以上为参考答案，希望能帮到你，望采纳！

Answer 2

Private Sub Form_Load()
Me.AutoRedraw = True
For i = 1 To 5
Me.Print String(5 - i, " ") & String(i * 2 - 1, "*")
Next i
End Sub