VB 输出有规律的图形,可打字字符组成长方形、四边形、三角形、直角三角形等图形,以下代码是输出长方形和四边形的代码,更多源码请在本页面下载完整源码。 Private Sub Command1_Click() For i = 1 To 5 '输出共5行 For j = 1 To 4 '输出4列 Picture1.Print "*"; '在图片框1中输出由*组成的长方形图形 Next j Picture1.Print '换行 Next i End Sub Private Sub Command2_Click() Fo