VB.NET坐標變換

Dim g As Graphics = PictureBox1.CreateGraphics

江寧網站制作公司哪家好，找創新互聯建站！從網頁設計、網站建設、微信開發、APP開發、響應式網站設計等網站項目制作，到程序開發，運營維護。創新互聯建站自2013年創立以來到現在10年的時間，我們擁有了豐富的建站經驗和運維經驗，來保證我們的工作的順利進行。專注于網站建設就選創新互聯建站。

g.TranslateTransform(2, 2) ‘定義原點坐標

g.ScaleTransform(1, -1) ’X軸不變，反轉Y軸

以PictureBox1中（2,2）點為新的原點（0,0）

向右為X軸正方向 向上為Y軸正方向

可不可以回答一下，vb.net中的窗體坐標和屏幕上的屏幕坐標怎么轉換？？ （最好是有代碼） 祝好人一生平安!

vb.net 2008

Public Class Form1

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

End Sub

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Dim a_Point, b_Point, c_point As Point

b_Point = MousePosition '鼠標點擊坐標（屏幕上的屏幕坐標）

a_Point = PointToClient(MousePosition) 'vb.net中的窗體坐標

c_point = PointToScreen(a_Point) '將vb.net中的窗體坐標轉換成屏幕上的屏幕坐標

End Sub

End Class

vb.net 坐標的轉化

也就是A(x,y)-------A'(y*sin(x*pi/180),y*cos(x*pi/180))------------前提是先：

Dim g As Graphics = Me.PictureBox1.CreateGraphics

g.TranslateTransform(x, y)'實現坐標平移，即把圓中心作為了坐標原點了-----該處的x,y為圓心在要作圖picture中的相對坐標

g.ScaleTransform(1, -1) 'X軸不變，反轉Y軸

本文題目：vb.net坐標轉換 vb坐標反算代碼
網站URL：http://vcdvsql.cn/article28/ddojocp.html

成都網站建設公司_創新互聯，為您提供網站排名、標簽優化、品牌網站建設、建站公司、定制開發、App設計

廣告

聲明：本網站發布的內容（圖片、視頻和文字）以用戶投稿、用戶轉載內容為主，如果涉及侵權請盡快告知，我們將會在第一時間刪除。文章觀點不代表本網站立場，如需處理請聯系客服。電話：028-86922220；郵箱：631063699@qq.com。內容未經允許不得轉載，或轉載時需注明來源： 創新互聯