VB.NET中怎么操作GDI图形,很多新手对此不是很清楚,为了帮助大家解决这个难题,下面小编将为大家详细讲解,有这方面需求的人可以来学习下,希望你能有所收获。通过重载FORM1窗体的OnPaint()方法绘制GDI图形Protected&n
VB.NET中怎么操作GDI图形,很多新手对此不是很清楚,为了帮助大家解决这个难题,下面小编将为大家详细讲解,有这方面需求的人可以来学习下,希望你能有所收获。
通过重载FORM1窗体的OnPaint()方法绘制GDI图形
Protected Overrides Sub onpaint
(ByVal e As System.windows.
Forms.PaintEventArgs)
注释://///////////VB.net操作GDI图形绘制任意直线
Dim g As Graphics =
e.Graphics
Dim mypen As Pen =
New Pen(Color.Red, 2)
g.DrawLine(mypen,
100, 100, 10, 10)
注释://///////////绘制矩形(任意直线构成的封闭图形)
Dim point1 As PointF =
New PointF(100F, 100F)
Dim point2 As PointF =
New PointF(200F, 100F)
Dim point3 As PointF =
New PointF(200F, 200F)
Dim point4 As PointF =
New PointF(100F, 200F)
Dim curvepoints As PointF()
= {point1, point2,
point3, point4}
g.DrawPolyGon(New
Pen(Color.Blue, 2),
curvepoints)
注释:////////////VB.NET操作GDI图形文本表示
Dim FFamily As FontFamily =
New FontFamily("Arial")
Dim font As Font = New Font
(FFamily, "20", FontStyle.
Bold, FontStyle.Italic,
GraphicsUnit.Pixel)
Dim text As String =
"I love you!"
Dim solidbrush As SolidBrush
= New SolidBrush(Color.Red)
Dim pr As PointF =
New PointF(100, 10)
e.Graphics.DrawString
(text, font, solidbrush, pr)
注释:////////////VB.NET操作GDI图形平面绘制
Dim rec As RectangleF =
New RectangleF(10, 10,
200, 100)
g.DrawPie(mypen, rec,
150, 150)
注释:///////////封闭图形,0.7应该是个圆
g.DrawClosedCurve(mypen,
curvepoints, 0.7, Drawing.
Drawing2D.FillMode.Alternate)
注释:///////////大家自己试试看吧
g.DrawArc(mypen, 300, 300,
200, 200, 100, 100)
g.DrawCurve(mypen, curvepoints)
g.DrawBezier(mypen, 50, 50,
100, 50, 100, 100, 50, 100)
g.DrawBeziers(mypen, curvepoints)
注释://////////这可是一个圆
Dim rec1 As RectangleF =
New RectangleF(10, 10, 100, 100)
g.DrawEllipse(mypen, rec1)
注释://////////这是一个椭圆
Dim rec2 As RectangleF =
New RectangleF(10, 10, 200, 100)
g.DrawEllipse(mypen, rec2)
End Sub
看完上述内容是否对您有帮助呢?如果还想对相关知识有进一步的了解或阅读更多相关文章,请关注编程网精选频道,感谢您对编程网的支持。
--结束END--
本文标题: VB.NET中怎么操作GDI图形
本文链接: https://www.lsjlt.com/news/291485.html(转载时请注明来源链接)
有问题或投稿请发送至: 邮箱/279061341@qq.com QQ/279061341
下载Word文档到电脑,方便收藏和打印~
2024-05-16
2024-05-16
2024-05-16
2024-05-16
2024-05-16
2024-05-16
2024-05-16
2024-05-16
2024-05-16
2024-05-16
回答
回答
回答
回答
回答
回答
回答
回答
回答
回答
0