用VB编写一个程序，能显示一个图形如：房子、汽车等

来源：百度知道 编辑：UC知道 时间：2024/05/26 07:27:36
用For语句编写，单击command按钮，用“*”来构造图形的形状。

来个房子的吧：

Private Sub Command1_Click()
Dim i As Integer, n As Integer
Cls
n = 5
For i = 1 To 3
Print String(4 - i, " ") & String(2 * i - 1, "*") & String(10, "*")
Next
For i = 1 To 4
Print " * *" & String(9, " ") & "*"
Next
Print " " & String(15, "*")
End Sub