文件名称:VB 6.0 输出有规律的图形.rar
文件大小:2KB
文件格式:RAR
更新时间:2022-07-30 13:25:32
VB源码-打印输出
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() For i = 1 To 5 '输出共5行 Picture2.Print Tab(i); '每行输出前重新进行定位 For j = 1 To 4 '输出4列 Picture2.Print "*"; '在图片框2中输出由*组成的平形四边形图形 Next j Picture2.Print '换行 Next i End Sub
【文件预览】:
srcfans.com
----输出有规律的图形()
--------E111.vbw(49B)
--------E111.vbp(684B)
--------MSSCCPRJ.SCC(189B)
--------Form1.frm(5KB)