VBA-Math-Objects Errors in Matrix.cls and Vector.cls

Hi, Thanks for your efforts and sharing's

When I compile your codes

in Matrix.cls file:

Public Function ReplaceRow(iNum, inRow As Vector) As Matrix
If Me.N <> inRow.N Then

Should be corrected. Vector does not have N

If Me.N <> inRow.M Then

in Vector.cls file

Public Function Magnitude()
Sum = 0

Should be corrected. Vector has a Sum function also

Public Function Magnitude()
dsum = 0
For i = 1 To Me.M
dsum = dsum + dA(i, 1) ^ 2
Next i
Magnitude = Math.sqr(dsum)
End Function

Good days

まず Matrix.cls と Vector.cls をコンパイルして、報告されたエラーを再現します。Matrix.cls の ReplaceRow と Vector.cls の Magnitude を確認し、修正されたメンバー参照がコンパイルでき、マグニチュードの計算が意図どおりに引き続き機能することを検証します。

索引モデルが issue の本文から書いたものです。