发现有人准备轻生:在vb.net中如何画实心的方形图

来源:百度文库 编辑:中科新闻网 时间:2024/07/06 13:07:59
我的指令是:
Dim myPen As New Pen(Color.Red)
e.Graphics.DrawRectangle(myPen, 10,10, 100,100)

我想可能是pen要设置,可不知道如何做。我先在这谢您了。

你应该填充这个矩形,比如说在你画的矩形上填充蓝色,要加上下面的语句
Dim myBrush As New SolidBrush(Color.Blue)
e.Graphics.FillRectangle(myBrush, 10,10, 100,100)