[VB.NET][C#]二维向量的基本运算

前言

　在数学中，几何向量是指具有大小和方向的几何对象。

　　在编程中，向量有着广泛的应用，其作用在图形编程和游戏物理引擎方面尤为突出。

第一节构造函数

　　通过创建一个二维向量的类（或结构体），实现向量的表示及其运算。

　　1. 首先，将类命名为“Vector2D”

　　2. 添加两个属性 X 和 Y ，分别表示二维向量的两个分量

　　3. 实现构造函数，实例化时即初始化 X，Y 的值

Public Class Vector2D

    Public Property x As Double 'x分量

    Public Property y As Double 'y分量

    ''' <summary>

    ''' 二维向量类，能够实现平面向量的表示与运算

    ''' </summary>

    ''' <param name="x">向量的X初始值,默认为0</param>

    ''' <param name="y">向量的Y初始值,默认为0</param>

    Public Sub New(Optional x As Double = , Optional y As Double = )

        Me.x = x

        Me.y = y

    End Sub

End Class

第二节四则运算

　　1.添加 Public 方法“Add()”，实现向量与向量加法

    ''' <summary>

    ''' 加上一个向量

    ''' </summary>

    ''' <param name="vector">要加的向量</param>

    ''' <remarks></remarks>

    Public Sub Add(ByVal vector As Vector2D)

        x += vector.x

        y += vector.y

    End Sub

　　2.添加 Public 方法“Minus()”，实现向量与向量减法

    ''' <summary>

    ''' 减去一个向量

    ''' </summary>

    ''' <param name="vector">要减的向量</param>

    ''' <remarks></remarks>

    Public Sub Minus(ByVal vector As Vector2D)

        x -= vector.x

        y -= vector.y

    End Sub

　　3.添加 Public 方法“Multiply()”，实现向量与标量乘法

    ''' <summary>

    ''' 乘以一个标量

    ''' </summary>

    ''' <param name="number">要乘的标量</param>

    ''' <remarks></remarks>

    Public Sub Multiply(ByVal number As Double)

        x *= number

        y *= number

    End Sub

　　4.添加 Public 方法“Divide()”，实现向量与标量除法

    ''' <summary>

    ''' 除以一个标量

    ''' </summary>

    ''' <param name="number">要除的标量</param>

    ''' <remarks></remarks>

    Public Sub Divide(ByVal number As Double)

        x /= number

        y /= number

    End Sub

第三节重载运算符

　　利用运算符重载（而不是调用方法）可以更简便的实现向量运算。

　　1. 直接在 Vector2D 类里重载运算符。

    '重载向量与向量加法运算符

    Public Overloads Shared Operator +(ByVal LeftVector As Vector2D, ByVal RightVector As Vector2D) As Vector2D

        Return New Vector2D(LeftVector.x + RightVector.x, LeftVector.y + RightVector.y)

    End Operator

    '重载向量与向量减法运算符

    Public Overloads Shared Operator -(ByVal LeftVector As Vector2D, ByVal RightVector As Vector2D) As Vector2D

        Return New Vector2D(LeftVector.x - RightVector.x, LeftVector.y - RightVector.y)

    End Operator

    '重载向量与标量乘法运算符

    Public Overloads Shared Operator *(ByVal LeftVector As Vector2D, ByVal RightNum As Double) As Vector2D

        Return New Vector2D(LeftVector.x * RightNum, LeftVector.y * RightNum)

    End Operator

    '重载标量与向量乘法运算符(交换律)

    Public Overloads Shared Operator *(ByVal LeftNum As Double, ByVal RightVector As Vector2D) As Vector2D

        Return New Vector2D(RightVector.x * LeftNum, RightVector.y * LeftNum)

    End Operator

    '重载向量与标量除法运算符

    Public Overloads Shared Operator /(ByVal LeftVector As Vector2D, ByVal RightNum As Double) As Vector2D

        Return New Vector2D(LeftVector.x / RightNum, LeftVector.y / RightNum)

    End Operator

第四节模的计算

　　1.添加 Public 函数“Magnitude()”，实现计算模长

    ''' <summary>

    ''' 返回向量的模长

    ''' </summary>

    ''' <returns></returns>

    Public Function Magnitude() As Double

        Return Math.Sqrt(x * x + y * y)

    End Function

　　2.添加 Public 方法“SetMag()”，实现设定模长

    ''' <summary>

    ''' 指定向量的模长

    ''' </summary>

    ''' <param name="sPutNum">指定的长度</param>

    Public Sub SetMag(ByVal sPutNum As Double)

        Dim tempMag As Double = Me.Magnitude

            x = x * (sPutNum / tempMag)

            y = y * (sPutNum / tempMag)

    End Sub

　　3.添加 Public 方法“LimitMag()”，实现限制模长

    ''' <summary>

    ''' 限制向量模长,小于或等于某一值

    ''' </summary>

    ''' <param name="lUponNum">指定的最大值</param>

    Public Sub LimitMag(ByVal lUponNum As Double)

        Dim tempMag As Double = Me.Magnitude

        If tempMag > lUponNum Then

            x = x * (lUponNum / tempMag)

            y = y * (lUponNum / tempMag)

        End If

    End Sub

第五节夹角与旋转

　　1.添加 Public Shared 函数“GetHeading()”，实现计算向量的方向角

    ''' <summary>

    ''' '求向量的方向角

    ''' </summary>

    ''' <param name="gVector">指定的向量</param>

    ''' <returns></returns>

    Public Shared Function GetHeading(ByVal gVector As Vector2D) As Double

        Dim Angle As Double

        Angle = Math.Asin(gVector.x / Math.Sqrt(gVector.x * gVector.x + gVector.y * gVector.y)) * ( / Math.PI)

        Return Angle

    End Function

　　2.添加 Public Shared 函数“GetAngleBetween()”，实现计算两个向量的夹角

    ''' <summary>

    '''  '求两向量的夹角

    ''' </summary>

    ''' <param name="gLeftVector">第一个向量</param>

    ''' <param name="gRightVector">第二个向量</param>

    ''' <returns></returns>

    Public Shared Function GetAngleBetween(ByVal gLeftVector As Vector2D, ByVal gRightVector As Vector2D) As Double

        Dim Angle As Double

        Angle = Math.Asin((gLeftVector.x * gRightVector.x + gLeftVector.y * gRightVector.y) /

                          (Math.Sqrt(gLeftVector.x * gLeftVector.x + gLeftVector.y * gLeftVector.y) *

                           Math.Sqrt(gRightVector.x * gRightVector.x + gRightVector.y * gRightVector.y))) *

                          ( / Math.PI)

        Return Angle

    End Function

　　3.添加Public方法“Rotate()”，实现向量旋转

    ''' <summary>

    ''' 向量旋转

    ''' </summary>

    ''' <param name="gAngle">指定旋转的角度，弧度制</param>

    Public Sub Rotate(ByVal gAngle As Double)

        Dim x1, y1 As Double

        x1 = x * Math.Cos(gAngle) - y * Math.Sin(gAngle)

        y1 = y * Math.Cos(gAngle) + x * Math.Sin(gAngle)

        x = x1

        y = y1

    End Sub

附录

　　System.Numerics 命名空间提供了一套启用了 SIMD 的矢量类型。

　　Vector2 结构：System.Numerics.Vector2

巴特西

[VB.NET][C#]二维向量的基本运算

前言

第一节构造函数

第二节四则运算

第三节重载运算符

第四节模的计算

第五节夹角与旋转

附录

最新文章

热门文章

巴特西

[VB.NET][C#]二维向量的基本运算

前言

第一节 构造函数

第二节 四则运算

第三节 重载运算符

第四节 模的计算

第五节 夹角与旋转

附录

最新文章

热门文章

第一节构造函数

第二节四则运算

第三节重载运算符

第四节模的计算

第五节夹角与旋转