在VB里如何进行符号的反向打印输出?就是打出一个三角形和平行四边形?代码是什么啊
问题描述:
在VB里如何进行符号的反向打印输出?就是打出一个三角形和平行四边形?代码是什么啊
答
三角形:Private Sub Image1_Click()Picture1.CurrentX = 0Picture1.CurrentY = 0For i = 0 To 5Picture1.Print Tab(8 - i);For j = 1 To 2 * i + 1Picture1.Print "*";Next jPrintNext iEnd Sub平行四边形:Private...