VB.NET坐標變換

Dim g As Graphics = PictureBox1.CreateGraphics

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

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

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

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

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

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

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中的窗體坐標轉(zhuǎn)換成屏幕上的屏幕坐標

End Sub

End Class

vb.net 坐標的轉(zhuǎn)化

也就是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)'實現(xiàn)坐標平移，即把圓中心作為了坐標原點了-----該處的x,y為圓心在要作圖picture中的相對坐標

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

本文題目：vb.net坐標轉(zhuǎn)換 vb坐標反算代碼
網(wǎng)站URL：http://jinyejixie.com/article28/ddojocp.html

成都網(wǎng)站建設公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站排名、標簽優(yōu)化、品牌網(wǎng)站建設、建站公司、定制開發(fā)、App設計

廣告

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