vb.net GDI+入门——使用DrawString显示文本

来源：巧巧读书网 作者：douces 出处：巧巧读书 2008-01-15 进入讨论组

• 关 键 词：
• vb.net

下一页 1 2 3 4 

在GDI+ 中，我们是使用Graphics 的 DrawString 方法来在对象的表面绘制文本，其它还需要用到FontFamliy、Font、StringFormat等类来控制文本的特征。在前面我们已经了解过Font类，这里我们通过本文重点来了解DrawString方法以及StringFormat类。

一、用GDI+ 绘制文本需要经过下面步骤：

1、在窗体代码前面引入Drawing2D 命名空间

代码如下：

Imports System.Drawing.Drawing2D

2、获取图形对象的引用

下面代码是创建一个可以在PictureBox 控件表面绘制图形的图形对象：

Dim g as Graphics=PictureBox1.CreateGraphics

3、创建用于绘制文字的Brush对象

Dim mBrush As New SolidBrush(Color.Blue)

4、创建绘制文本时使用的字体对象Font

如下代码所示，我们创建一个宋体，20码的字体对象：

Dim mFont As New Font("宋体", 20)

5、使用DrawString 方法在指定的位置绘制文本

使用DrawString 方法时，如果提供了一个矩形对象(RectangleF)，则文本在这个指定的矩形中换行显示，否则将从提供的坐标起始绘制显示文本。如下代码所示：

g.DrawString("欢迎访问巧巧读书网", mFont, mBrush, 0, 10)

g.DrawString("欢迎访问巧巧读书网", mFont, mBrush, New RectangleF(10, 40, 100, 200))

完整代码如下(假设窗体上已经有了一个PictureBox 控件，一个Button 控件)：

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim g As Graphics = PictureBox1.CreateGraphics

Dim mBrush As New SolidBrush(Color.Blue)

Dim mFont As New Font("宋体", 20)

g.DrawString("欢迎访问巧巧读书网", mFont, mBrush, 0, 10)

'在矩形中绘制文本

g.DrawString("欢迎访问巧巧读书网", mFont, mBrush, New RectangleF(10, 40, 100, 200))

End Sub

http://www.qqread.com/book/myvbnet/my0047.html

运行效果如下图一所示：

图一：运行效果图

URl收藏 http://www.qqread.com/book/myvbnet/my0047.html 更多内容请看Solaris基础知识入门、.NET移动与嵌入式技术、.NET开发手册专题，或进入讨论组讨论。

下一页 1 2 3 4 

【收藏此文】【大 中 小】【打印】【关闭】

较早的文章：VB2005中开发新一代控制台应用程序(1)

较新的文章：ListView中屏蔽双击时改变CheckBox状态