建站
咨詢
售后
建站咨詢
新聞中心
VB.NET坐標(biāo)變換
Dim g As Graphics = PictureBox1.CreateGraphics
江寧網(wǎng)站制作公司哪家好，找創(chuàng)新互聯(lián)建站！從網(wǎng)頁設(shè)計、網(wǎng)站建設(shè)、微信開發(fā)、APP開發(fā)、響應(yīng)式網(wǎng)站設(shè)計等網(wǎng)站項目制作，到程序開發(fā)，運(yùn)營維護(hù)。創(chuàng)新互聯(lián)建站自2013年創(chuàng)立以來到現(xiàn)在10年的時間，我們擁有了豐富的建站經(jīng)驗(yàn)和運(yùn)維經(jīng)驗(yàn)，來保證我們的工作的順利進(jìn)行。專注于網(wǎng)站建設(shè)就選創(chuàng)新互聯(lián)建站。
g.TranslateTransform(2, 2) ‘定義原點(diǎn)坐標(biāo)
g.ScaleTransform(1, -1) ’X軸不變，反轉(zhuǎn)Y軸
以PictureBox1中（2,2）點(diǎn)為新的原點(diǎn)（0,0）
向右為X軸正方向 向上為Y軸正方向
可不可以回答一下，vb.net中的窗體坐標(biāo)和屏幕上的屏幕坐標(biāo)怎么轉(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 '鼠標(biāo)點(diǎn)擊坐標(biāo)（屏幕上的屏幕坐標(biāo)）
a_Point = PointToClient(MousePosition) 'vb.net中的窗體坐標(biāo)
c_point = PointToScreen(a_Point) '將vb.net中的窗體坐標(biāo)轉(zhuǎn)換成屏幕上的屏幕坐標(biāo)
End Sub
End Class
vb.net 坐標(biāo)的轉(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)'實(shí)現(xiàn)坐標(biāo)平移，即把圓中心作為了坐標(biāo)原點(diǎn)了-----該處的x,y為圓心在要作圖picture中的相對坐標(biāo)
g.ScaleTransform(1, -1) 'X軸不變，反轉(zhuǎn)Y軸
新聞標(biāo)題：vb.net坐標(biāo)轉(zhuǎn)換 vb坐標(biāo)反算代碼
標(biāo)題URL：http://fisionsoft.com.cn/article/ddojocp.html
