提示: (1)可以通过函数Spc(n)或Tab(n)来定位,或者利用函数Space(n)在输出的内容前加空格,来控制输出

用vb创建应用程序,单击窗体可显示由*组成的平行四边形图案

Private Sub Form_Click()

cls

    For i = 1 To 6

        Print Tab(i); "************"

    Next i

End Sub

温馨提示:答案为网友推荐,仅供参考
相似回答