【文件属性】:
文件名称:Line方法画矩形 VB代码例子.rar
文件大小:2KB
文件格式:RAR
更新时间:2022-07-30 11:40:02
VB源码-图形处理
VB画图例子,Line方法画矩形 VB代码例子,虽然简单,参考学习挺有用的:
Private Sub Form_Load()
Show
x = 150
y = 150
Line (100, 100)-Step(x, y), QBColor(1), BF '画出第1个蓝色小矩形
For i = 2 To 4
Line -Step(x * i, y * i), QBColor(i), BF '依次画出递增矩形
Next i
For i = 100 To 800 Step 100
Line (4000 - i, 1000 - i)-(4000 i, 1000 i), , B '画嵌套方形
Next i
End Sub
【文件预览】:
srcfans.com
----Line方法画矩形()
--------E310.vbp(684B)
--------E310.vbw(50B)
--------Form1.frm(806B)
--------MSSCCPRJ.SCC(189B)