當前位置: 首頁>>代碼示例>>VB.NET>>正文


VB.NET Matrix.Rotate方法代碼示例

本文整理匯總了VB.NET中System.Drawing.Drawing2D.Matrix.Rotate方法的典型用法代碼示例。如果您正苦於以下問題:VB.NET Matrix.Rotate方法的具體用法?VB.NET Matrix.Rotate怎麽用?VB.NET Matrix.Rotate使用的例子?那麽, 這裏精選的方法代碼示例或許可以為您提供幫助。您也可以進一步了解該方法所在System.Drawing.Drawing2D.Matrix的用法示例。


在下文中一共展示了Matrix.Rotate方法的2個代碼示例,這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚,您的評價將有助於係統推薦出更棒的VB.NET代碼示例。

示例1: RotateExample

Public Sub RotateExample(ByVal e As PaintEventArgs)
    Dim myPen As New Pen(Color.Blue, 1)
    Dim myPen2 As New Pen(Color.Red, 1)

    ' Draw the rectangle to the screen before applying the transform.
    e.Graphics.DrawRectangle(myPen, 150, 50, 200, 100)

    ' Create a matrix and rotate it 45 degrees.
    Dim myMatrix As New Matrix
    myMatrix.Rotate(45, MatrixOrder.Append)

    ' Draw the rectangle to the screen again after applying the
    ' transform.
    e.Graphics.Transform = myMatrix
    e.Graphics.DrawRectangle(myPen2, 150, 50, 200, 100)
End Sub
開發者ID:VB.NET開發者,項目名稱:System.Drawing.Drawing2D,代碼行數:16,代碼來源:Matrix.Rotate

示例2: MainClass

' 導入命名空間
Imports System
Imports System.Windows.Forms
Imports System.Drawing
Imports System.Drawing.Drawing2D
Imports System.Drawing.Text
Imports System.Drawing.Imaging

Public Class MainClass

  Shared Sub Main()
    Dim m As Matrix = New Matrix()
    m.Rotate(90, MatrixOrder.Append)
    m.Translate(7, 12, MatrixOrder.Append)
    Dim p() As Point = {New Point(20, 45)}

    Console.WriteLine(p.GetValue(0).ToString())

    m.TransformPoints(p)

    Console.WriteLine(p.GetValue(0).ToString())
  End Sub
  
End Class
開發者ID:VB程序員,項目名稱:System.Drawing.Drawing2D,代碼行數:24,代碼來源:Matrix.Rotate


注:本文中的System.Drawing.Drawing2D.Matrix.Rotate方法示例由純淨天空整理自Github/MSDocs等開源代碼及文檔管理平台,相關代碼片段篩選自各路編程大神貢獻的開源項目,源碼版權歸原作者所有,傳播和使用請參考對應項目的License;未經允許,請勿轉載。