在窗体上绘制形状

2008-08-18

更新：2007 年 11 月

在本课中，您将学习如何在窗体上绘制形状，如矩形或圆形。

在前一课中，您学习了如何使用 DrawLine 图形方法和 Pen 对象在窗体上绘制线条。除 DrawLine 方法外，Visual Basic 中还有用于绘制形状的图形方法，以及用于填充形状的图形对象（称为“画笔”）。

绘制简单形状

绘制形状类似于绘制线条 — 需要定义坐标和绘制使用的颜色。线条采用的坐标定义起点和终点，而形状（如方形或矩形）采用的坐标描述形状的左上角、宽度和高度。

圆形和椭圆没有左上角，因此坐标描述的是其边框（一个假想的与圆或椭圆具有相同宽度和高度的矩形）的左上角。

试一试！

绘制形状

在“文件”菜单上，选择“新建项目”。
在“新建项目”对话框的“模板”窗格中，单击“Windows 应用程序”。
在“名称”框中键入 Shapes，再单击“确定”。

一个新的 Windows 窗体项目随即打开。
双击该窗体以打开代码编辑器，然后从“事件”下拉列表中选择“Paint”。

在 Form1_Paint 事件处理程序中，添加以下代码。

' Draw a 200 by 150 pixel green rectangle.
e.Graphics.DrawRectangle(Pens.Green, 10, 10, 200, 150)
' Draw a blue square
e.Graphics.DrawRectangle(Pens.Blue, 30, 30, 150, 150)
' Draw a 150 pixel diameter red circle.
e.Graphics.DrawEllipse(Pens.Red, 0, 0, 150, 150)
' Draw a 250 by 125 pixel yellow oval.
e.Graphics.DrawEllipse(Pens.Yellow, 20, 20, 250, 125)

按 F5 运行程序。您应该可以看到窗体上的四个形状。

使项目保持打开状态——您将在下一过程中向项目中添加内容。

绘制填充形状

目前，您所绘制的形状仅是轮廓。若要用纯色绘制形状，需要使用一种“填充”方法，例如 FillRectangle 或 FillEllipse。填充方法使用 Brush 对象，它是可以绘制的另一种类型的图形对象。

当使用另一种颜色填充形状时，定义的坐标必须比形状小，否则的话会覆盖住边框。例如，若要用坐标 0, 0, 150, 150 填充方形，需指定使用 1, 1, 148, 148 坐标的填充，这考虑了线条的一个像素的粗细。

绘制填充形状

在 Form1_Paint 事件处理程序中，在前面输入的代码下面添加以下代码。

' Fill the circle with the same color as its border.
e.Graphics.FillEllipse(Brushes.Red, 0, 0, 150, 150)
' Fill the square with a different color.
e.Graphics.FillRectangle(Brushes.Aquamarine, 31, 31, 148, 148)