vb.net坐标变换的简单介绍

如何用vb.net语言，将AutoCAD里的坐标系Y轴方向，即变向上为正转为向下为正。

工具 -新建-z轴矢量。在再你要变坐标的地方的一点 点击一下让z轴向上，就可以了。

创新互联公司是创新、创意、研发型一体的综合型网站建设公司，自成立以来公司不断探索创新，始终坚持为客户提供满意周到的服务，在本地打下了良好的口碑，在过去的十载时间我们累计服务了上千家以及全国政企客户，如成都木托盘等企业单位，完善的项目管理流程，严格把控项目进度与质量监控加上过硬的技术实力获得客户的一致赞扬。

可不可以回答一下，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坐标变换

Dim g As Graphics = PictureBox1.CreateGraphics

g.TranslateTransform(2, 2) ‘定义原点坐标

g.ScaleTransform(1, -1) ’X轴不变，反转Y轴

以PictureBox1中（2,2）点为新的原点（0,0）

向右为X轴正方向 向上为Y轴正方向