用VB怎么样实现画一个圆和一条直线,一个矩形?

2024-12-23 08:03:22
推荐回答(2个)
回答1:

这个简单.
加入一个图片框:picture1.
一个命今按钮:command1.
按钮的单击事件在图片框里画图:

Private Sub Command1_Click()
Picture1.Circle (600, 800), 500, vbRed '画圆

Picture1.Line (300, 400)-(1700, 1800), vbBlue '画线

Picture1.Line (600, 500)-(600, 1500), vbGreen '下面四项都是画矩形的
Picture1.Line (600, 1500)-(2500, 1500), vbGreen
Picture1.Line (2500, 1500)-(2500, 500), vbGreen
Picture1.Line (2500, 500)-(600, 500), vbGreen

End Sub

回答2:

vb.net不是有一个画图形的控件吗