成人免费xxxxx在线视频软件_久久精品久久久_亚洲国产精品久久久_天天色天天色_亚洲人成一区_欧美一级欧美三级在线观看

淺析VB.NET繪制GDI圖形的方法

開發 后端
這里介紹用VB.NET繪制GDI圖形,Visual Basic.NET是基于微軟.NET Framework之上的面向對象的中間解釋性語言,可以看作是Visual Basic在.Net Framework平臺上的升級版本,增強了對面向對象的支持。

在向大家詳細介紹用VB.NET繪制GDI圖形之前,首先讓大家了解下VB.NET是什么,然后全面介紹VB.NET繪制GDI圖形。

Visual Basic.NET是基于微軟.NET Framework之上的面向對象的中間解釋性語言,可以看作是Visual Basic在.Net Framework平臺上的升級版本,增強了對面向對象的支持。但由于改動太大,導致VB.net對VB的向后兼容性不好,在業界引起不小的爭議。

大多的VB.Net程序員使用Visual Studio .Net作為IDE(integrated development environment). SharpDevelop是另一種可用的開源的IDE。VB.Net需要在.Net Framework平臺上才能執行。 VB.NET的主頁http://msdn.microsoft.com/vbasic

用VB.NET繪制GDI圖形

  1. Protected Overrides Sub onpaint(ByVal e As System.Windows.Forms.PaintEventArgs)  
  2. '繪制任意直線  
  3. Dim g As Graphics = e.Graphics  
  4. Dim mypen As Pen = New Pen(Color.Red, 2)  
  5. g.DrawLine(mypen, 100, 100, 10, 10)  
  6. '繪制矩形(任意直線構成的封閉圖形)  
  7. Dim point1 As PointF = New PointF(100F, 100F)  
  8. Dim point2 As PointF = New PointF(200F, 100F)  
  9. Dim point3 As PointF = New PointF(200F, 200F)  
  10. Dim point4 As PointF = New PointF(100F, 200F)  
  11. Dim curvepoints As PointF() = {point1, point2, point3, point4}  
  12. g.DrawPolygon(New Pen(Color.Blue, 2), curvepoints)  
  13. '文本表示  
  14. Dim FFamily As FontFamily = New FontFamily("Arial")  
  15. Dim font As Font = New Font(FFamily, "20", FontStyle.Bold, FontStyle.Italic,  
  16. GraphicsUnit.Pixel)  
  17. Dim text As String = "I love you!" 
  18. Dim solidbrush As SolidBrush = New SolidBrush(Color.Red)  
  19. Dim pr As PointF = New PointF(100, 10)  
  20. e.Graphics.DrawString(text, font, solidbrush, pr)  
  21. '平面繪制  
  22. Dim rec As RectangleF = New RectangleF(10, 10, 200, 100)  
  23. g.DrawPie(mypen, rec, 150, 150)  
  24. '封閉圖形,0.7應該是個圓  
  25. g.DrawClosedCurve(mypen, curvepoints, 0.7,  
  26. Drawing.Drawing2D.FillMode.Alternate)  
  27. '大家自己試試看吧  
  28. g.DrawArc(mypen, 300, 300, 200, 200, 100, 100)  
  29. g.DrawCurve(mypen, curvepoints)  
  30. g.DrawBezier(mypen, 50, 50, 100, 50, 100, 100, 50, 100)  
  31. g.DrawBeziers(mypen, curvepoints)  
  32. '這可是一個圓  
  33. Dim rec1 As RectangleF = New RectangleF(10, 10, 100, 100)  
  34. g.DrawEllipse(mypen, rec1)  
  35. '這是一個橢圓  
  36. Dim rec2 As RectangleF = New RectangleF(10, 10, 200, 100)  
  37. g.DrawEllipse(mypen, rec2)  
  38. End Sub 

以上介紹VB.NET繪制GDI圖形,這些是我自己試驗出來的,當然了,還有好多,我只是開了一個頭,大家要是發現什么好東東,別忘了通知一下。

【編輯推薦】

  1. 講解VB.NET訪問注冊表方法
  2. 淺析VB.NET開發自動分頁
  3. VB.NET ListView控件經驗總結
  4. 概括VB.NET獲取網卡地址的步驟
  5. 講述VB.NET制作透明窗體
責任編輯:佚名 來源: IT168
相關推薦

2010-01-12 10:19:02

VB.NET操作GDI

2009-11-03 09:26:13

VB.NET方法

2009-10-13 15:20:02

VB.NET使用Dra

2009-11-03 10:00:20

VB.NET New方

2009-10-23 16:43:01

VB.NET繪制圖形

2010-01-13 17:16:37

VB.NET冒號

2009-11-03 13:48:02

VB.NET枚舉

2009-10-15 17:41:14

VB.NET Impo

2009-10-27 09:31:32

VB.NET啟動Sma

2009-12-24 14:30:56

VB.NET

2009-10-10 15:43:51

2009-10-12 14:32:40

VB.NET實現定時關

2009-10-16 14:07:18

VB.NET使用Mon

2010-01-22 18:08:18

VB.NET與GDI結

2011-05-20 16:56:11

VB.NETGDI

2009-10-23 12:53:25

VB.NET語言

2009-10-13 16:05:07

VB.NET字符數據類

2009-10-16 15:06:13

VB.NET組合時間值

2009-10-16 09:21:49

VB.NET開發自動分

2009-10-13 11:28:39

VB.NET面向對象編
點贊
收藏

51CTO技術棧公眾號

主站蜘蛛池模板: 久久国产精品色av免费观看 | 又爽又黄axxx片免费观看 | 日韩精品极品视频在线观看免费 | 国产香蕉视频 | 91资源在线播放 | 亚洲一一在线 | 欧美 日韩精品 | 在线免费黄色小视频 | 欧美激情精品久久久久久免费 | 91在线影院 | 国产精品一区二区欧美 | 最新免费黄色网址 | 国产精品视频久久久久久 | 色站综合| 一区二区精品在线 | 做a视频在线观看 | 国产精品一级 | 国产精品亚洲精品 | 国产精品视频久久久久久 | 亚洲天天干 | 欧美一区二区三区视频在线播放 | 亚洲小视频 | 色婷婷综合久久久中文字幕 | 欧美日韩精品一区二区三区四区 | 丝袜 亚洲 另类 欧美 综合 | 国产精品99久久久久久动医院 | 久久亚洲国产 | 日韩视频区 | 午夜视频精品 | 久久躁日日躁aaaaxxxx | 久久精品久久久久久 | 精品美女久久久久久免费 | 免费一区二区 | 99精品一区二区三区 | 免费在线观看毛片 | 古典武侠第一页久久777 | 网黄在线| 久久综合一区 | 亚洲国产激情 | 天天综合91| 韩国毛片一区二区三区 |