用vb创建应用程序,单击窗体可显示由*组成的平行四边形图案
Private Sub Form_Click()
cls
For i = 1 To 6
Print Tab(i); "************"
Next i
End Sub