锐客网

  1. 首页 > 睿知 > it技术 > >

vb.netbrush的简单介绍

IT技术绘制

vb.net2010中如何在窗口中建立画布'绘制图形vb.netbrush的三步曲
'1vb.netbrush，获得一个Graphics对象
Dim MyGraphics As Graphics
MyGraphics = Me.CreateGraphics
'2，定义一个Pen对象，用于绘制图形（轮廓线）
Dim MyPen As New Pen(Color.Black)
'3，定义一个Brush对象，用于填充图形（如果需要填充vb.netbrush的话）
Dim MyBrush As New SolidBrush(Color.Orange)
MyGraphics.FillEllipse(MyBrush, 200, 200, 100, 100)'绘制一个实心圆，该圆在vb.netbrush：直线x=200，y=200，x=200 100，y=200 100所划的矩形区域内
MyGraphics.DrawEllipse(MyPen, 200, 200, 100, 100)'绘制一个空心圆 ， 该圆在：直线x=200，y=200，x=200 100，y=200 100所划的矩形区域内
在VB NET中 ， 在Form_Load中创建graphics类 ， 并绘制直线 ， 为什么执行程序后发现直线绘制不出来？1. 创建一个Graphics对象实例 。
绘制图形必须创建Graphics对象 。如果是在窗体上绘图vb.netbrush ， 要使用下列代码创建Graphics对象vb.netbrush；
Dim MyGraphics As Graphics = Me.CreateGraphics
如果是在PictrueBox里绘图，要使用下列代码创建Graphics对象vb.netbrush；
Dim MyGraphics As Graphics = PictureBox1.CreateGraphics
2. 定义一个Brush对象，用来填充图形(如果你需要填充vb.netbrush的话) 。
如果填充封闭曲线或者多边形，必须创建Brush对象（或者Brush类vb.netbrush的继承类对象），用来确定填充的颜色 。例如下面的代码，创建了一个填充红色的画刷对象 。在最后的括号里，用Color结构指定的枚举值 ， 确定画刷的颜色 。限于篇幅有关Color结构这里不展开，可能在后续博文里介绍 。
【vb.netbrush的简单介绍】Dim RedBrush As New SolidBrush(Color.Red)
有关vb.net里的hatchbrushImports System.Drawing.Drawing2D
Public Class Form1
Private Sub Form1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Click
'定义一个 Graphics对象
'调用窗体的CreateGraphics 方法创建 Graphics 对象
Dim g As Graphics
g = Me.CreateGraphics

'创建用实心菱形图案进行绘制，并使用红色作为前景色，蓝色作为背景色的画笔
Dim aHatchBrush As HatchBrush = New HatchBrush(HatchStyle.SolidDiamond, Color.Red, Color.Blue)

'创建矩形的位置和大小
Dim x As Integer = 0
Dim y As Integer = 0
Dim width As Integer = 150
Dim height As Integer = 200
'调用图形方法FillRectangle 将定义的矩形绘制到创建Graphics 对象上
g.FillRectangle(aHatchBrush, x, y, width, height)
End Sub
End Class
vb.net读取txt的数据作图问题一、分析：
1，这一类随时间而变化的曲线图，通常把横轴作为时间，把纵轴作为相应的值，在这里就是密度值 。
2，点的集合就是线；一组时间、密度值，对应一个点，把点连接起来就构成了线 。
二、在VB.NET中作图 ， 需要知道并解决几个问题：
1，与VB6一样，VB.NET中默认的坐标系统 ， 左上角为坐标原点，X轴的正向为从左向右 ， Y轴的正向是从上向下 。
为了使得它与数学中的坐标系统相一致，可以使用VB.NET中Graphics类的两个方法；
1、TranslateTransform----平移变换
格式：Graphics.TranslateTransform(dx,dy)
其中：dx 和 dy分别是Single数据类型
2、ScaleTransform----缩放变换
格式：Graphics.ScaleTransform(sx,sy)
其中：sx 和 sy分别是Single数据类型；
例如：为了符合数学中的一般格式，可以使用下述代码：
Graphics.ScaleTransform(1, -1)
这样就把Y轴的正方向给翻过来了 。
三、VB.NET中绘制图形
1，绘制圆或椭圆
'绘制图形的三步曲
'1，获得一个Graphics对象
Dim MyGraphics As Graphics
MyGraphics = Me.CreateGraphics
'2，定义一个Pen对象，用于绘制图形（轮廓线）
Dim MyPen As New Pen(Color.Black)
'3，定义一个Brush对象，用于填充图形（如果需要填充的话）
Dim MyBrush As New SolidBrush(Color.Orange)
'绘制一个实心圆，该圆在：直线x=200，y=200 ， x=200 100，y=200 100所划的矩形区域内
MyGraphics.FillEllipse(Brush, 200, 200, 100, 100)
'绘制一个空心圆 ， 该圆在：直线x=200，y=200 ， x=200 100，y=200 100所划的矩形区域内
MyGraphics.DrawEllipse(Pen, 200, 200, 100, 100)
注意：最后两个数值如果不等 ， 就是绘制椭圆
当圆足够小，就是点了 。
2，绘制直线
'1 ， 获得一个Graphics对象
Dim MyGraphics As Graphics
MyGraphics = Me.CreateGraphics
'2，定义一个Pen对象 ， 用于绘制图形（轮廓线）
Dim MyPen As New Pen(Color.Black)
MyGraphics.DrawLine(MyPen, 200, 200, 100, 100)
'或者直接用
Me.CreateGraphics.DrawLine(New Pen(Color.Black), 50, 50, 200, 200)
VB.net 旋转图像时，如何指定填充色绘制线条采用Draw开头的方法，颜色参数用Pen类；
绘制有填充色的封闭图形采用Fill开头的方法，颜色参数用Brush类；
例如：
'绘制一个实心圆，该圆在：直线x=200，y=200 ， x=200 100，y=200 100所划矩形区域内
Me.CreateGraphics.FillEllipse(New SolidBrush(Color.Orange), 200, 200, 100, 100)
'绘制一个空心圆，该圆在：直线x=200，y=200，x=200 100 ， y=200 100所划矩形区域内
Me.CreateGraphics.DrawEllipse(New Pen(Color.Black), 200, 200, 100, 100)
vb.netbrush的介绍就聊到这里吧，感谢你花时间阅读本站内容，更多关于、vb.netbrush的信息别忘了在本站进行查找喔 。

    推荐阅读


    上一篇：u盘修复数据后怎么整理，u盘修复数据后怎么整理桌面

    下一篇：最快开发游戏，最简单的游戏开发工具