Chinaunix首页 | 论坛 | 博客
  • 博客访问: 743906
  • 博文数量: 769
  • 博客积分: 6000
  • 博客等级: 准将
  • 技术积分: 4985
  • 用 户 组: 普通用户
  • 注册时间: 2008-10-15 16:37
文章分类

全部博文(769)

文章存档

2011年(1)

2008年(768)

我的朋友

分类:

2008-10-15 16:38:29

在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://qread.com/book/myvbnet/my0047.html

运行效果如下图一所示:

vb.net GDI+入门——使用DrawString显示文本(图一)
图一:运行效果图

以上我们在知道了如何使用DrawString方法,下面我们看看如何格式化文本对象。

[1]    

【责编:Luzi】

--------------------next---------------------

阅读(820) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~